/* Variables : */
extern protdescr *prototype[];
-extern word ipradr; /* address of primitive type descriptions */
-extern word temporary; /* address of global temporary variables */
-extern word strings; /* base for string constants */
-extern word lastprot; /* the last used prototype number */
-extern word freem; /* first free cell in M */
-extern word currfile; /* current file virtual address */
+
+/** address of primitive type descriptions */
+extern word ipradr;
+
+/** address of global temporary variables */
+extern word temporary;
+
+/** base for string constants */
+extern word strings;
+
+/** the last used prototype number */
+extern word lastprot;
+
+/** first free cell in M */
+extern word freem;
+
+/** current file virtual address */
+extern word currfile;