Added comments and m2_traps.h

h/.distr

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

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 */