This is the 4th distribution version

lang/m2/comp/desig.H

@@ -17,7 +17,7 @@
 */
 
 struct desig {
-	short	dsg_kind;
+	int	dsg_kind;
 #define DSG_INIT	0	/* don't know anything yet */
 #define DSG_LOADED	1	/* designator loaded  on top of the stack */
 #define DSG_PLOADED	2	/* designator accessible through pointer on
@@ -45,25 +45,21 @@ struct desig {
 				*/
 };
 
-typedef struct desig	t_desig;
-
-/* ALLOCDEF "desig" 5 */
-
 /* The next structure describes the designator in a with-statement.
    We have a linked list of them, as with-statements may be nested.
 */
 
 struct withdesig {
 	struct withdesig *w_next;
-	int w_flags;		/* D_USED|D_DEFINED */
 	struct scope *w_scope;	/* scope in which fields of this record
 				   reside
 				*/
-	t_desig w_desig;	/* a desig structure for this particular
+	struct desig w_desig;	/* a desig structure for this particular
 				   designator
 				*/
 };
 
 extern struct withdesig	*WithDesigs;
+extern struct desig	InitDesig;
 
 #define NO_LABEL	((label) 0)

modules/src/string/Makefile

@@ -2,6 +2,7 @@ EMHOME = ../../..
 MODULES = $(EMHOME)/modules
 INSTALL = $(MODULES)/install
 COMPARE = $(MODULES)/compare
+AR	= ar
 
 CFLAGS = -O
 
@@ -15,7 +16,7 @@ OBJ =	bts2str.o btscat.o btscmp.o btscpy.o btszero.o long2str.o \
 all:		libstring.a
 
 libstring.a:	$(OBJ) Makefile
-		ar r libstring.a $(OBJ)
+		$(AR) r libstring.a $(OBJ)
 		-sh -c 'ranlib libstring.a'
 
 install:	all
@@ -34,3 +35,7 @@ opr:
 
 clean:
 		rm -f *.[oa]
+
+lintlib:
+		lint -Cstring $(SRC)
+		mv llib-lstring.ln $(MODULES)/lib