Fix scoped type variables for expression type signatures

[ghc-hetmet.git] / rts / Interpreter.c

diff --git a/rts/Interpreter.c b/rts/Interpreter.c
index 56e9bb6..94a0286 100644 (file)
--- a/rts/Interpreter.c
+++ b/rts/Interpreter.c
@@ -261,8 +261,6 @@ eval_obj:
     case CONSTR_2_0:
     case CONSTR_1_1:
     case CONSTR_0_2:
-    case CONSTR_INTLIKE:
-    case CONSTR_CHARLIKE:
     case CONSTR_STATIC:
     case CONSTR_NOCAF_STATIC:
     case FUN:
@@ -1251,7 +1249,8 @@ run_BCO:
            
            // Errors
        default: 
-           barf("interpretBCO: unknown or unimplemented opcode");
+           barf("interpretBCO: unknown or unimplemented opcode %d",
+                 (int)BCO_NEXT);
 
        } /* switch on opcode */
     }