summaryrefslogtreecommitdiff
path: root/win32
diff options
context:
space:
mode:
authorshyouhei <shyouhei@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2008-06-07 16:27:11 +0000
committershyouhei <shyouhei@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2008-06-07 16:27:11 +0000
commitd3f86f8abb3101f5d1ec5cfec299f9c942820e8a (patch)
treec3afb3cd179734612c19f2eba489b54d905f1718 /win32
parent0cbba017ffdc44ffac97e9d41797d485bd4bd34c (diff)
merge revision(s) 13688:
* {bcc,win}32/mkexports.rb: explicit data. [ruby-list:44108] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8_6@16889 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'win32')
-rwxr-xr-xwin32/mkexports.rb10
1 files changed, 7 insertions, 3 deletions
diff --git a/win32/mkexports.rb b/win32/mkexports.rb
index 214e4c6772..6ebe443fb3 100755
--- a/win32/mkexports.rb
+++ b/win32/mkexports.rb
@@ -7,13 +7,14 @@ SYM = {}
objs = ARGV.collect {|s| s.tr('/', '\\')}
IO.foreach("|dumpbin -symbols " + objs.join(' ')) do |l|
next if /^[0-9A-F]+ 0+ UNDEF / =~ l
- next unless l.sub!(/.*\sExternal\s+\|\s+/, '')
+ next unless l.sub!(/.*?\s(\(\)\s+)?External\s+\|\s+/, "")
+ is_data = !$1
if l.sub!(/^_/, '')
next if /@.*@/ =~ l || /@[0-9a-f]{16}$/ =~ l
elsif !l.sub!(/^(\S+) \([^@?\`\']*\)$/, '\1')
next
end
- SYM[l.strip] = true
+ SYM[l.strip] = is_data
end
exports = []
@@ -23,7 +24,10 @@ elsif $library
exports << "Library " + $library
end
exports << "Description " + $description.dump if $description
-exports << "EXPORTS" << SYM.keys.sort
+exports << "EXPORTS"
+SYM.sort.each do |sym, is_data|
+ exports << (is_data ? "#{sym} DATA" : sym)
+end
if $output
open($output, 'w') {|f| f.puts exports.join("\n")}