[project @ 2006-01-19 02:15:38 by sof]
[ghc-hetmet.git] / ghc / driver / test_mangler
index f24f0e4..96cf31c 100644 (file)
@@ -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";