From 8eeb63b4f374971fc04345e615e00d1756e04cf3 Mon Sep 17 00:00:00 2001 From: Wolfgang Thaller Date: Sun, 22 Apr 2012 12:39:51 +0200 Subject: [PATCH] remove CurrentA5/A5 restoration hack (gcc is now patched to consider A5 fixed) --- PrepareHeaders.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/PrepareHeaders.hs b/PrepareHeaders.hs index 9531f4bb0f..12005bc21c 100644 --- a/PrepareHeaders.hs +++ b/PrepareHeaders.hs @@ -187,8 +187,8 @@ outputItem typeMap (FunctionItem rettype name argumentTypes argumentNames words showConstraints constraints = PP.text ":" <+> PP.hsep (PP.punctuate PP.comma $ constraints) asmStatements = - (if tooltrap then [-- PP.text "\"move.l %%a5, %%a4\\n\"", - PP.text "\"move.l 0x904.w, %%a5\\n\""] else []) ++ +-- (if tooltrap then [-- PP.text "\"move.l %%a5, %%a4\\n\"", +-- PP.text "\"move.l 0x904.w, %%a5\\n\""] else []) ++ subq ++ pushes ++ map (\trapnum -> PP.text "\"dc.w" <+> PP.text "0x" <> PP.text (showHex trapnum "") <> PP.text "\\n\\t\"") words