codegen: simplify glue code and emit code for all basicblocks

[mate.git] / Mate / NativeMachine.hs

diff --git a/Mate/NativeMachine.hs b/Mate/NativeMachine.hs
index 542cc159bfc0009f219cba29a56eb7b1cdcc3225..2587d939bb4342b8b3dbbcb354d4e0f96da6ca98 100644 (file)
--- a/Mate/NativeMachine.hs
+++ b/Mate/NativeMachine.hs
@@ -3,14 +3,18 @@ module Mate.NativeMachine(
   emitFromBB,
   mateHandler,
   register_signal,
-  ptrSize, longSize
+  ptrSize, longSize,
+  NativeWord
   )where
 
-#ifdef i386_HOST_ARCH
+#ifdef ARCH_X86
 import Mate.X86CodeGen
 import Mate.X86TrapHandling
 import Mate.NativeSizes
-
 #else
-#error "no other arch supported yet :/"
+
+-- HACK, for ghc-mod ...
+import Mate.X86CodeGen
+import Mate.X86TrapHandling
+import Mate.NativeSizes
 #endif