зеркало из https://github.com/github/ruby.git
25 строки
591 B
Ruby
25 строки
591 B
Ruby
#!./miniruby -s
|
|
|
|
$:.unshift(File.expand_path("../..", __FILE__))
|
|
require 'win32/mkexports'
|
|
|
|
class Exports::Bcc < Exports
|
|
Forwards = /^rb_w32_(\w+)/
|
|
|
|
def forwarding(internal, export)
|
|
internal[/\A_?/]+export
|
|
end
|
|
|
|
def each_export(objs)
|
|
objs.each do |obj|
|
|
opt = /\.(?:so|dll)\z/i =~ obj ? "-ee" : "-oiPUBDEF -oiPUBD32"
|
|
IO.foreach("|tdump -q #{opt} #{obj.tr('/', '\\')} < nul") do |l|
|
|
next unless /(?:PUBDEF|PUBD32|EXPORT)/ =~ l
|
|
yield $1 if /'(.*?)'/ =~ l
|
|
end
|
|
end
|
|
yield "_strcasecmp", "_stricmp"
|
|
yield "_strncasecmp", "_strnicmp"
|
|
end
|
|
end
|