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

Did not detect redeclaration of formal as local

Browse source
This commit is contained in:
ceriel 1991-05-27 15:06:36 +00:00
parent 3891c03e0e
commit 2838d446ef
1 changed files with 8 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
lang/cem/cemcom.ansi/idf.c
View file

@ -293,15 +293,17 @@ declare_idf(ds, dc, lvl)
#ifdef LINT
check_hiding(idf, lvl, sc); /* of some idf by this idf */
#endif LINT
if (def && lvl == L_LOCAL && def->df_level == L_FORMAL2) {
error("%s redeclared", idf->id_text);
}
if ((def &&
if (def &&
( def->df_level == lvl ||
( lvl != L_GLOBAL && def->df_level > lvl )
))
|| (lvl == L_GLOBAL
&& def && def->df_level == L_PROTO
( lvl != L_GLOBAL && def->df_level > lvl ) ||
(lvl == L_GLOBAL
&& def->df_level == L_PROTO
&& def->next && def->next->df_level == L_GLOBAL)
) {
)) {
/* There is already a declaration for idf on this
level, or even more inside.
The rules differ for different levels.