From a1d0f6b61c52ed8bfd0deecca821bd43331301e7 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Fri, 3 Aug 2001 00:08:07 +0000
Subject: [PATCH] [project @ 2001-08-03 00:08:07 by sof] Only define i_CCALL
 iff bci_CCALL is defined in WithHc's ByteCodes.h

---
 ghc/compiler/ghci/ByteCodeLink.lhs |    4 ++++
 1 file changed, 4 insertions(+)

diff --git a/ghc/compiler/ghci/ByteCodeLink.lhs b/ghc/compiler/ghci/ByteCodeLink.lhs
index 31c912a..8aecbe2 100644
--- a/ghc/compiler/ghci/ByteCodeLink.lhs
+++ b/ghc/compiler/ghci/ByteCodeLink.lhs
@@ -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)
 
-- 
1.7.10.4