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

Newer version, safety commit

Browse Source
This commit is contained in:
ceriel
1986-03-29 01:04:49 +00:00
parent 1581b2ecd8
commit d2d9a3c817
11 changed files with 339 additions and 102 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
lang/m2/comp/expression.g
View File

@@ -25,11 +25,8 @@ qualident(int types; struct def **pdf; char *str;)
struct def *lookfor();
} :
IDENT { if (types) {
df = lookfor(dot.TOK_IDF, 1);
if (df->df_kind == D_ERROR) {
*pdf = df;
types = 0;
}
*pdf = df = lookfor(dot.TOK_IDF, 1);
if (df->df_kind == D_ERROR) types = 0;
}
}
[
@@ -53,7 +50,7 @@ qualident(int types; struct def **pdf; char *str;)
]*
{ if (types && !(types & df->df_kind)) {
error("identifier \"%s\" is not a %s",
dot.TOK_IDF, str);
df->df_idf->id_text, str);
}
}
;