X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fghci%2FByteCodeFFI.lhs;h=d1ee02cd568ac5fa008a19545ca37bbea197cd84;hb=565a4494b5bedd68c0a6d468c78f542477b89aa7;hp=70d215320afcf09a071cef5dc37d251ee8f171bc;hpb=59f79a3389648572d238f1114671b0071dc89861;p=ghc-hetmet.git

diff --git a/ghc/compiler/ghci/ByteCodeFFI.lhs b/ghc/compiler/ghci/ByteCodeFFI.lhs
index 70d2153..d1ee02c 100644
--- a/ghc/compiler/ghci/ByteCodeFFI.lhs
+++ b/ghc/compiler/ghci/ByteCodeFFI.lhs
@@ -275,6 +275,10 @@ mkMarshalCode_wrk cconv (r_offW, r_rep) addr_offW arg_offs_n_reps
      ++ ret
      )
 
+#else /* i386_TARGET_ARCH */
+
+mkMarshalCode_wrk = undefined
+
 #endif /* i386_TARGET_ARCH */
 
 \end{code}