File: munge

package info (click to toggle)
pocketpc-sdk 1.0.0-4
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k, lenny
  • size: 84 kB
  • ctags: 10
  • sloc: makefile: 56; perl: 9
file content (14 lines) | stat: -rwxr-xr-x 277 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
#!/usr/bin/perl -w
# Redefine the symbols listed on standard in.

$TARGET = 'arm-wince-pe';
$OBJCOPY = $TARGET . '-objcopy';

$library = $ARGV[0];

while(<STDIN>) {
	chomp;
	$command = "$OBJCOPY --redefine-sym _$_=_M\\\$_$_ $library";
	print "$command\n";
	print `$command`;
}