diff options
| author | Ben.Lippmeier@anu.edu.au <unknown> | 2009-02-15 08:36:01 +0000 |
|---|---|---|
| committer | Ben.Lippmeier@anu.edu.au <unknown> | 2009-02-15 08:36:01 +0000 |
| commit | 3d52165d6ff86168fd68addd56be0eb1893aaa1f (patch) | |
| tree | ffd4e669ba63740f61dc0ba2cd7f2d1fdef11e5f /compiler/nativeGen/PIC.hs | |
| parent | f6d38cd45225acd1d6a729fbeebd43146a498feb (diff) | |
| download | haskell-3d52165d6ff86168fd68addd56be0eb1893aaa1f.tar.gz | |
NCG: validate fixes for ppc-darwin
Diffstat (limited to 'compiler/nativeGen/PIC.hs')
| -rw-r--r-- | compiler/nativeGen/PIC.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/compiler/nativeGen/PIC.hs b/compiler/nativeGen/PIC.hs index 6fda1e3f3c..74c8bb3fce 100644 --- a/compiler/nativeGen/PIC.hs +++ b/compiler/nativeGen/PIC.hs @@ -445,9 +445,8 @@ pprGotDeclaration ArchX86 OSDarwin ptext (sLit "\tmovl (%esp), %eax"), ptext (sLit "\tret") ] - | otherwise - = empty - +pprGotDeclaration _ OSDarwin + = Pretty.empty -- pprGotDeclaration -- Output whatever needs to be output once per .s file. |