[project @ 2000-12-20 13:18:37 by simonmar]

Comment out definition of i_LABEL, which referred to non-existent bci_LABEL.

diff --git a/ghc/compiler/ghci/ByteCodeGen.lhs b/ghc/compiler/ghci/ByteCodeGen.lhs
index e1f45cf..9b594c4 100644 (file)
--- a/ghc/compiler/ghci/ByteCodeGen.lhs
+++ b/ghc/compiler/ghci/ByteCodeGen.lhs
@@ -1477,7 +1477,7 @@ i_MKAP     = (bci_MKAP :: Int)
 i_UNPACK   = (bci_UNPACK :: Int)
 i_UPK_TAG  = (bci_UPK_TAG :: Int)
 i_PACK     = (bci_PACK :: Int)
-i_LABEL    = (bci_LABEL :: Int)
+--i_LABEL    = (bci_LABEL :: Int)
 i_TESTLT_I = (bci_TESTLT_I :: Int)
 i_TESTEQ_I = (bci_TESTEQ_I :: Int)
 i_TESTLT_F = (bci_TESTLT_F :: Int)