diff -ru fort77-1.18/fort77 fort77-1.18-patched/fort77
--- fort77-1.18/fort77	Mon Apr 19 08:19:36 1999
+++ fort77-1.18-patched/fort77	Fri Oct  3 21:42:38 2003
@@ -13,7 +13,7 @@
 $cpp = 0;
 $fast_math = 1;
 $debug = 0;
-$cc = $ENV{'CC'} || 'cc';
+$cc = $ENV{'CC'} || 'cc';
 
 # Loop over all options; pull all options from @ARGV and put all
 # arguments into @argv.	 This is needed because, apparently, UNIX
@@ -191,7 +191,8 @@
 
 push(@fopts,$nnflag);
 push(@copts,'-ffast-math') if $optimize && $fast_math;
-push(@cppopts,@includes);
+push(@cppopts,@includes,"-I<PREFIX>/include");
+push(@lopts,"-L<PREFIX>/lib");
 push(@fopts,@includes,"-I.");
 push(@fopts, @pfiles);
 
@@ -253,7 +254,7 @@
 
 	if ($cpp || ($ffile =~ /\.F$/)) {
 #         Backslashes at the end of comment lines confuse cpp...
-	    $pipe =  "| /lib/cpp -traditional " . 
+	    $pipe =  "| gcc -E -traditional-cpp " . 
 		join(' ',@cppopts) . " | f2c " .
 		    join(' ',@fopts) . $debugcmd . "2>$xtmperrout > $cfile ";
 	    print STDERR "$0: Running \"$pipe\"" if $verbose;