Added a comment about se.info.type being used uninitialized

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

diff --git a/rts/Interpreter.c b/rts/Interpreter.c
index 81d4e38..62fe505 100644 (file)
--- a/rts/Interpreter.c
+++ b/rts/Interpreter.c
@@ -10,9 +10,9 @@
 #include "RtsUtils.h"
 #include "Closures.h"
 #include "TSO.h"
+#include "Storage.h"
 #include "Schedule.h"
 #include "RtsFlags.h"
-#include "Storage.h"
 #include "LdvProfile.h"
 #include "Updates.h"
 #include "Sanity.h"
@@ -1249,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 */
     }