X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fdriver%2Ftest_mangler;h=96cf31ca68fb1ce8b042c247f2f085a9ab5a72b2;hb=76c0086f090327eecaf510de8bc4efc4dee996dc;hp=f24f0e4bc07d41e99610e71796702363a92a6dcd;hpb=5eb1c77c795f92ed0f4c8023847e9d4be1a4fd0d;p=ghc-hetmet.git diff --git a/ghc/driver/test_mangler b/ghc/driver/test_mangler index f24f0e4..96cf31c 100644 --- a/ghc/driver/test_mangler +++ b/ghc/driver/test_mangler @@ -1,7 +1,9 @@ -#! /usr/local/bin/perl +#! /usr/bin/perl # a simple wrapper to test a .s-file mangler # reads stdin, writes stdout +push(@INC,"/net/dazdak/BUILDS/gransim-4.04/i386-unknown-linux/ghc/driver"); + $TargetPlatform = $ARGV[0]; shift; # nice error checking, Will require("ghc-asm.prl") || die "require mangler failed!\n";