X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=mate.git;a=blobdiff_plain;f=Mate%2FX86TrapHandling.hs;fp=Mate%2FX86TrapHandling.hs;h=5f993a6203304533635681149baa6ed09655d574;hp=e8695aa1a97b07d93ce15cb0d13a3d3d4f6e5814;hb=60297de17a166656519429b9652c0cf059e900f1;hpb=1e63f480bc9f7fe5808cd903670a315a9bc178fd

diff --git a/Mate/X86TrapHandling.hs b/Mate/X86TrapHandling.hs
index e8695aa..5f993a6 100644
--- a/Mate/X86TrapHandling.hs
+++ b/Mate/X86TrapHandling.hs
@@ -67,7 +67,7 @@ patchWithHarpy patcher reip = do
   let entry = Just (intPtrToPtr (fromIntegral reip), fixme)
   let cgconfig = defaultCodeGenConfig { customCodeBuffer = entry }
   (_, Right right) <- runCodeGenWithConfig (withDisasm $ patcher reip) () () cgconfig
-  when mateDEBUG $ mapM_ (printfJit . printf "patched: %s\n" . showAtt) $ snd right
+  when mateDEBUG $ mapM_ (printfJit . printf "patched: %s\n" . showIntel) $ snd right
   return $ fst right
 
 withDisasm :: CodeGen e s CPtrdiff -> CodeGen e s (CPtrdiff, [Instruction])