[project @ 2001-08-03 00:08:07 by sof]
authorsof <unknown>
Fri, 3 Aug 2001 00:08:07 +0000 (00:08 +0000)
committersof <unknown>
Fri, 3 Aug 2001 00:08:07 +0000 (00:08 +0000)
Only define i_CCALL iff bci_CCALL is defined in WithHc's ByteCodes.h

ghc/compiler/ghci/ByteCodeLink.lhs

index 31c912a..8aecbe2 100644 (file)
@@ -600,7 +600,11 @@ i_ENTER    = (bci_ENTER :: Int)
 i_RETURN   = (bci_RETURN :: Int)
 i_STKCHECK = (bci_STKCHECK :: Int)
 i_JMP      = (bci_JMP :: Int)
+#ifdef bci_CCALL
 i_CCALL    = (bci_CCALL :: Int)
+#else
+i_CCALL    = error "Sorry pal, you need to bootstrap to use i_CCALL."
+#endif
 
 iNTERP_STACK_CHECK_THRESH = (INTERP_STACK_CHECK_THRESH :: Int)