[project @ 1999-03-02 19:50:12 by sof]
[ghc-hetmet.git] / ghc / rts / Bytecodes.h
index daf3a9e..dea89e0 100644 (file)
@@ -1,6 +1,6 @@
-/* -*- mode: hugs-c; -*- */
+
 /* -----------------------------------------------------------------------------
- * $Id: Bytecodes.h,v 1.3 1999/02/05 16:02:36 simonm Exp $
+ * $Id: Bytecodes.h,v 1.4 1999/03/01 14:47:07 sewardj Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -13,7 +13,7 @@
  *
  * Notes:
  * o INTERNAL_ERROR is never generated by the compiler and usually
- *   indicates as error in the heap.
+ *   indicates an error in the heap.
  *   PANIC is generated by the compiler whenever it tests an "irrefutable"
  *   pattern which fails.  If we don't see too many of these, we could
  *   optimise out the redundant test.
@@ -53,7 +53,6 @@ typedef enum
     , i_RETADDR
 
     , i_VOID
-
     , i_RETURN_GENERIC
 
     , i_VAR_INT
@@ -121,6 +120,9 @@ typedef enum
 typedef enum
     { i_INTERNAL_ERROR1  /* Instruction 0 raises an internal error */
 
+    , i_pushseqframe
+    , i_pushcatchframe
+
     /* Char# operations */
     , i_gtChar
     , i_geChar
@@ -415,8 +417,6 @@ typedef enum
     { i_INTERNAL_ERROR2  /* Instruction 0 raises an internal error */
 
     , i_raise       
-    , i_catch       
-    , i_force
 
 #ifdef PROVIDE_ARRAY
     /* Ref operations */