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

newer version

Browse Source
This commit is contained in:
ceriel
1986-06-20 14:36:49 +00:00
parent f0d88d3de3
commit 07297eeb2a
16 changed files with 337 additions and 196 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lang/m2/comp/statement.g
View File

@@ -229,9 +229,12 @@ ReturnStatement(struct node **pnd;)
{
register struct def *df = CurrentScope->sc_definedby;
register struct node *nd;
extern int return_occurred;
} :
RETURN { *pnd = nd = MkLeaf(Stat, &dot); }
RETURN { *pnd = nd = MkLeaf(Stat, &dot);
return_occurred = 1;
}
[
expression(&(nd->nd_right))
{ if (scopeclosed(CurrentScope)) {