vlp-10 Using coding style in genint.h and comm.h

[vlp.git] / src / global / genint1.h

diff --git a/src/global/genint1.h b/src/global/genint1.h
index 9aeb0572ca113fca1212b13bbda6ec1e99e19d08..e01313501c513676aac879df307b2f8793e43f82 100644 (file)
--- a/src/global/genint1.h
+++ b/src/global/genint1.h
@@ -114,59 +114,57 @@ typedef int bool;
 
 
 #if GEN
-typedef   int   protaddr ;   /* mainblock..maxprot ; mainblock = 0; */
+typedef   int   protaddr;   /* mainblock..maxprot ; mainblock = 0; */
                              /* INDIRECT ADDRESS OF PROTOTYPE       */
-typedef   int   dprotaddr ;  /* PROTADDR + DUMMY                    */
-typedef   int   protkind ;
+typedef   int   dprotaddr;  /* PROTADDR + DUMMY                    */
+typedef   int   protkind;
 #else
 #define protaddr  int
 #define dprotaddr int
 #define protkind  int
 #endif
 
-
 typedef        int word;
 /* Prototype : */
 
 typedef struct {
-    dprotaddr slprototype ;   /* PROTOTYPE OF SYNTACTIC FATHER */
-                              /* OR DUMMY FOR THE MAIN BLOCK   */
-    word codeaddr;            /* address of code */
-    word appetite;            /* object's total length */
-    word span;                /* distance from beginning of object to */
-                              /* temporary reference variables */
-    word reflist;             /* beginning and length of table with */
+       dprotaddr slprototype;  /* PROTOTYPE OF SYNTACTIC FATHER */
+                               /* OR DUMMY FOR THE MAIN BLOCK   */
+       word codeaddr;          /* address of code */
+       word appetite;          /* object's total length */
+       word span;              /* distance from beginning of object to */
+                               /* temporary reference variables */
+       word reflist;           /* beginning and length of table with */
 
-    int lthreflist;           /* offsets of reference values in object; */
-                              /* without SL, DL, CL and temporary values */
-    word parlist;             /* beginning and length of table with */
-    int lthparlist;           /* offsets of parameters */
+       int lthreflist;         /* offsets of reference values in object; */
+                               /* without SL, DL, CL and temporary values */
+       word parlist;           /* beginning and length of table with */
+       int lthparlist;         /* offsets of parameters */
 
-    word preflist;            /* beginning and length of table with */
-    int lthpreflist;          /* prototype numbers of prefix sequence */
+       word preflist;          /* beginning and length of table with */
+       int lthpreflist;        /* prototype numbers of prefix sequence */
 
-    word lastwill;            /* lastwill code address */
-    word handlerlist;         /* list of handlers, 0 if empty */
-    word virtlist;            /* address of table for conversion: */
-                              /*     virtual number --> prototype */
+       word lastwill;          /* lastwill code address */
+       word handlerlist;       /* list of handlers, 0 if empty */
+       word virtlist;          /* address of table for conversion: */
+                               /*     virtual number --> prototype */
 
-    /* only for processes : */
-    protaddr  maskbase ;      /* lowest procedure prototype number */
-    int       masksize ;      /* size of RPC mask for that process */
+       /* only for processes : */
+       protaddr maskbase;      /* lowest procedure prototype number */
+       int masksize;           /* size of RPC mask for that process */
 
-    /* for procedures and functions */
-    int virtnumber;           /* virtual number or -1 if not virtual */
+       /* for procedures and functions */
+       int virtnumber;         /* virtual number or -1 if not virtual */
 
-    /* for all : */
-    protkind  kind ;          /* kind of unit */
+       /* for all : */
+       protkind  kind;         /* kind of unit */
 
-    /* only for procedures, functions and processes : */
-    word pfdescr;             /* address of table with parameters descr. addresses */
+       /* only for procedures, functions and processes : */
+       word pfdescr;           /* address of table with parameters descr. addresses */
 
-    /* only for functions : */
-    int nrarray;
-    word finaltype;  /* type of result */
+       /* only for functions : */
+       int nrarray;
+       word finaltype;         /* type of result */
 
 } protdescr,*pointprdsc;
 
-