Browse Source

Added comments and m2_traps.h

ceriel 36 years ago
parent
commit
0cf358f442
2 changed files with 10 additions and 6 deletions
  1. 1 0
      h/.distr
  2. 9 6
      h/m2_traps.h

+ 1 - 0
h/.distr

@@ -24,3 +24,4 @@ ranlib.h
 ocm_chan.h
 ocm_parco.h
 ocm_proc.h
+m2_traps.h

+ 9 - 6
h/m2_traps.h

@@ -1,6 +1,9 @@
-#define M2_TOOLARGE	64
-#define M2_TOOMANY	65
-#define M2_NORESULT	66
-#define M2_UOVFL	67
-#define M2_FORCH	68
-#define M2_UUVFL	69
+/* Modula-2 runtime errors */
+
+#define M2_TOOLARGE	64	/* stack of process too large */
+#define M2_TOOMANY	65	/* too many nested traps & handlers */
+#define M2_NORESULT	66	/* no RETURN from procedure function */
+#define M2_UOVFL	67	/* cardinal overflow */
+#define M2_FORCH	68	/* FOR-loop control variable changed */
+#define M2_UUVFL	69	/* cardinal underflow */
+#define M2_INTERNAL	70	/* internal error, should not happen */