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

fixed some label problems

Browse Source
This commit is contained in:
ceriel 1991-06-20 10:17:36 +00:00
parent 478d7e56e1
commit cdf50398c1
2 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lang/cem/cemcom.ansi/l_states.c
View File

@ -1140,8 +1140,8 @@ lint_jump_stmt(idf)
dbg_lint_stack("lint_jump_stmt");
top_ls->ls_current->st_notreached = 1;
top_ls->ls_current->st_warned = 0;
if (idf->id_def)
idf->id_def->df_used = 1;
if (idf->id_label)
idf->id_label->df_used = 1;
}
lint_label()

1
lang/cem/cemcom.ansi/label.c
View File

@ -30,6 +30,7 @@ enter_label(idf, defining)
error("redeclaration of label %s", idf->id_text);
}
else {
stack_idf(idf, stack_level_of(L_LOCAL));
def = new_def();
def->df_sc = LABEL;
idf->id_label = def;