some fixes, and changed priority of unary minus

1987-06-18 15:46:08 +00:00
parent 9046645590
commit ca742a5d0c
13 changed files with 94 additions and 35 deletions
--- a/lang/m2/comp/declar.g
+++ b/lang/m2/comp/declar.g
@@ -169,7 +169,7 @@ SimpleType(register struct type **ptp;)
 		/* The subrange type is given a base type by the
 		   qualident (this is new modula-2).
 		*/
-			{ chk_basesubrange(tp, *ptp); }
+			{ chk_basesubrange(tp, *ptp); *ptp = tp; }
 	]
 |
 	enumeration(ptp)