godzil/ack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

bug fixes, name changes

Browse Source
This commit is contained in:
ceriel
1987-07-16 19:51:40 +00:00
parent 4804ab14b8
commit e04230a126
17 changed files with 85 additions and 82 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lang/m2/comp/declar.g
View File

@@ -218,11 +218,11 @@ IdentList(struct node **p;)
IDENT { *p = q = MkLeaf(Value, &dot); }
[ %persistent
',' IDENT
{ q->next = MkLeaf(Value, &dot);
q = q->next;
{ q->nd_left = MkLeaf(Value, &dot);
q = q->nd_left;
}
]*
{ q->next = 0; }
{ q->nd_left = 0; }
;
SubrangeType(struct type **ptp;)
@@ -416,7 +416,7 @@ SetType(struct type **ptp;) :
PointerType(register struct type **ptp;) :
POINTER TO
[ %if (type_or_forward(ptp))
type(&((*ptp)->next))
type(&((*ptp)->tp_next))
|
IDENT
]