d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

minor mods to parameters in grammar

Browse source
This commit is contained in:
ceriel 1991-11-29 14:11:31 +00:00
parent 649b7d94f0
commit ed4afc99f6
4 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lang/cem/cemcom.ansi/declar.g
View file

@ -499,7 +499,7 @@ struct_declaration(struct type *stp; struct sdef ***sdefpp; arith *szp;)
type_specifier(&tp) struct_declarator_list(tp, stp, sdefpp, szp) ';'
;
struct_declarator_list(struct type *tp, *stp;
struct_declarator_list(struct type *tp; struct type *stp;
struct sdef ***sdefpp; arith *szp;)
:
struct_declarator(tp, stp, sdefpp, szp)

2
lang/cem/cemcom/declar.g
View file

@ -445,7 +445,7 @@ struct_declaration(struct type *stp; struct sdef ***sdefpp; arith *szp;)
]
;
struct_declarator_list(struct type *tp, *stp;
struct_declarator_list(struct type *tp; struct type *stp;
struct sdef ***sdefpp; arith *szp;)
:
struct_declarator(tp, stp, sdefpp, szp)

2
lang/occam/comp/occam.g
View file

@ -157,7 +157,7 @@ conditional(register *END; ) { struct symbol *v;
]
;
replicator(register struct symbol **s; register struct expr **e1, **e2; )
replicator(register struct symbol **s; register struct expr **e1; register struct expr **e2; )
{ register char *index; }:
IDENTIFIER { index=token.t_sval; }
'=' '[' val_expr(e1) FOR val_expr(e2) ']'

4
lang/pc/comp/declar.g
View file

@ -721,7 +721,7 @@ VariantPart(struct scope *scope; arith *cnt; int *palign;
}
;
VariantTail(register struct scope *scope; arith *tcnt, *max, *cnt;
VariantTail(register struct scope *scope; arith *tcnt; arith *max; arith *cnt;
int *palign; unsigned short packed; struct selector *sel;):
/* This is a new rule because the grammar specified by the standard
* is not exactly LL(1).
@ -982,7 +982,7 @@ UnpackedConformantArraySchema(register struct type **ptp;)
}
;
Index_TypeSpecification(register struct type **ptp, *tp;)
Index_TypeSpecification(register struct type **ptp; register struct type *tp;)
{
register struct def *df1, *df2;
} :