diff options
author | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-10-13 18:55:54 +0000 |
---|---|---|
committer | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-10-13 18:55:54 +0000 |
commit | f31e0ec7fc9fa36f23078ee107c485364676bf8e (patch) | |
tree | 6176f7da97d977566380c34796f9b6fc6a379dfb /bcc32/mkexports.rb | |
parent | 0b95a09a71c8f296c68f87b9899d6bc0ae7ff63e (diff) |
* win32/mkexports.rb: deal with __fastcall name decorations.
[ruby-list:44111]
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@13694 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'bcc32/mkexports.rb')
-rwxr-xr-x | bcc32/mkexports.rb | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/bcc32/mkexports.rb b/bcc32/mkexports.rb index 3cc8e535df..dc523e2541 100755 --- a/bcc32/mkexports.rb +++ b/bcc32/mkexports.rb @@ -7,7 +7,7 @@ STDIN.reopen(open("nul")) ARGV.each do |obj| IO.foreach("|tdump -q -oiPUBDEF -oiPUBD32 #{obj.tr('/', '\\')}") do |l| next unless /(?:PUBDEF|PUBD32)/ =~ l - SYM[$1] = !$2 if /'(.*?)'\s+Segment:\s+_(TEXT)?/ =~ l + SYM[$1] = true if /'(.*?)'/ =~ l end end @@ -18,10 +18,7 @@ elsif $library exports << "Library " + $library end exports << "Description " + $description.dump if $description -exports << "EXPORTS" -SYM.sort.each do |sym, is_data| - exports << (is_data ? "#{sym} DATA" : sym) -end +exports << "EXPORTS" << SYM.keys.sort if $output open($output, 'w') {|f| f.puts exports.join("\n")} |