bug fix in local extern-declarations, some other minor changes

This commit is contained in:
ceriel
1987-06-01 10:17:29 +00:00
parent ed7105e2cf
commit 1fb8da7a02
4 changed files with 15 additions and 14 deletions

View File

@@ -263,7 +263,11 @@ declare_idf(ds, dc, lvl)
warning("redeclaring reserved word %s", idf->id_text);
}
#endif
if (def && def->df_level >= lvl) {
if (def &&
( def->df_level == lvl ||
( lvl != L_GLOBAL && def->df_level > lvl )
)
) {
/* There is already a declaration for idf on this
level, or even more inside.
The rules differ for different levels.