diff options
Diffstat (limited to 'lang/ghc/files/patch-ghc-compiler-nativeGen-MachMisc.lhs')
| -rw-r--r-- | lang/ghc/files/patch-ghc-compiler-nativeGen-MachMisc.lhs | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/lang/ghc/files/patch-ghc-compiler-nativeGen-MachMisc.lhs b/lang/ghc/files/patch-ghc-compiler-nativeGen-MachMisc.lhs new file mode 100644 index 000000000000..a196c68cf817 --- /dev/null +++ b/lang/ghc/files/patch-ghc-compiler-nativeGen-MachMisc.lhs @@ -0,0 +1,15 @@ +--- ghc/compiler/nativeGen/MachMisc.lhs.orig Thu Dec 11 11:42:12 2003 ++++ ghc/compiler/nativeGen/MachMisc.lhs Thu Dec 11 11:44:02 2003 +@@ -71,11 +71,11 @@ + fmtAsmLbl :: String -> String -- for formatting labels + + fmtAsmLbl s +- = IF_ARCH_alpha( + {- The alpha assembler likes temporary labels to look like $L123 + instead of L123. (Don't toss the L, because then Lf28 + turns into $f28.) + -} ++ = IF_ARCH_alpha( + '$' : s + ,{-otherwise-} + '.':'L':s |