From b797673bb4e7afcd935b62c258424934fc68713b Mon Sep 17 00:00:00 2001
From: rrt <unknown>
Date: Wed, 14 Mar 2001 10:16:19 +0000
Subject: [PATCH] [project @ 2001-03-14 10:16:19 by rrt] Get 'dis /tmp offa ma
 back, it stops me doin' Windows hack!

---
 ghc/driver/split/ghc-split.lprl |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/driver/split/ghc-split.lprl b/ghc/driver/split/ghc-split.lprl
index 6ed909a..3fe2b81 100644
--- a/ghc/driver/split/ghc-split.lprl
+++ b/ghc/driver/split/ghc-split.lprl
@@ -45,7 +45,7 @@ sub split_asm_file {
 #	if $prologue_stuff eq $s_stuff;
 
     # lie about where this stuff came from
-    $prologue_stuff =~ s|"/tmp/ghc\d+\.c"|"$ifile_root\.hc"|g;
+    $prologue_stuff =~ s|"${Tmp_prefix}\.c"|"$ifile_root\.hc"|g;
 
     while ( $_ ne '' ) { # not EOF
 	$octr++;
-- 
1.7.10.4