-/* Type of files : */
-#define TEXTF 1 /* text file */
-#define CHARF 2 /* file of char */
-#define INTF 3 /* file of integer */
-#define REALF 4 /* file of real */
-#define DIRECT 5 /* direct access file */
-
-/* File status : */
-#define READING 0 /* sequential file opened for read */
-#define WRITING 1 /* sequential file opened for write */
-#define UPDATING 2 /* direct access file */
-#define UNKNOWN 3 /* file not opened */
-
-/* Run time error types : */
-
-#define RTESLCOF 0 /* SL chain cut off */
-#define RTEUNSTP 1 /* unimplemented standard procedure */
-#define RTEILLAT 2 /* illegal attach */
-#define RTEILLDT 3 /* illegal detach */
-#define RTECORTM 4 /* coroutine terminated */
-#define RTECORAC 5 /* coroutine active */
-#define RTEINVIN 6 /* array index error */
-#define RTEILLAB 7 /* incorrect array bounds */
-#define RTEINCQA 8 /* improper QUA */
-#define RTEINCAS 9 /* illegal assignment */
-#define RTEFTPMS 10 /* formal type missing */
-#define RTEILLKL 11 /* illegal kill */
-#define RTEILLCP 12 /* illegal copy */
-#define RTEINCHS 13 /* incompatible headers */
-#define RTEHNDNF 14 /* handler not found */
-#define RTEMEMOV 15 /* memory overflow */
-#define RTEFHTLG 16 /* formal header too long */
-#define RTEILLRT 17 /* illegal return */
-#define RTEREFTN 18 /* reference to NONE */
-#define RTEDIVBZ 19 /* division by zero */
-#define RTESYSER 20 /* system error */
-#define RTEILLIO 21 /* illegal I/O operation */
-#define RTEIOERR 22 /* I/O error */
-#define RTECNTOP 23 /* Cannot open file */
-#define RTEBADFM 24 /* Input data format bad */
-#define RTEILLRS 25 /* illegal resume */
-#define RTETMPRC 26 /* too many processes on one machine */
-#define RTEINVND 27 /* invalid node number */
-#define RTENEGST 28 /* negative step value */
-#define RTENONGL 29 /* only process may be global */
+/** memory overflow */
+#define RTEMEMOV 15
+
+/** formal header too long */
+#define RTEFHTLG 16
+
+/** illegal return */
+#define RTEILLRT 17
+
+/** reference to NONE */
+#define RTEREFTN 18
+
+/** division by zero */
+#define RTEDIVBZ 19
+
+/** system error */
+#define RTESYSER 20
+
+/** illegal I/O operation */
+#define RTEILLIO 21
+
+/** I/O error */
+#define RTEIOERR 22
+
+/** Cannot open file */
+#define RTECNTOP 23
+
+/** Input data format bad */
+#define RTEBADFM 24
+
+/** illegal resume */
+#define RTEILLRS 25
+
+/** too many processes on one machine */
+#define RTETMPRC 26
+
+/** invalid node number */
+#define RTEINVND 27
+
+/** negative step value */
+#define RTENEGST 28
+
+/** only process may be global */
+#define RTENONGL 29
+/** @} */