Changeset 3202
- Timestamp:
- Apr 22, 2007, 4:36:53 PM (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/essentials/dev-lang/perl/makedef.pl
r3191 r3202 1236 1236 elsif ($PLATFORM eq 'os2') { 1237 1237 open MAP, 'miniperl.map' or die 'Cannot read miniperl.map'; 1238 /^\s*[\da-f:]+ \s+_(\w+)/i and $mapped{$1}++ foreach <MAP>;1238 /^\s*[\da-f:]+[\s*]\s*_(\w+)/i and $mapped{$1}++ foreach <MAP>; 1239 1239 close MAP or die 'Cannot close miniperl.map'; 1240 1240
Note:
See TracChangeset
for help on using the changeset viewer.