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

Some corrections and additions to improve the mechanism for

Browse Source 
generating warnings on unused/uninitialized variables
This commit is contained in:
ceriel
1987-10-21 11:29:52 +00:00
parent 71df6e6cb8
commit 015e1b776e
14 changed files with 92 additions and 63 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lang/m2/comp/defmodule.c
View File

@@ -97,14 +97,14 @@ GetDefinitionModule(id, incr)
t_scope *newsc = CurrentScope;
level += incr;
df = lookup(id, GlobalScope, 1);
df = lookup(id, GlobalScope, 1, 0);
if (!df) {
/* Read definition module. Make an exception for SYSTEM.
*/
DefId = id;
if (!strcmp(id->id_text, "SYSTEM")) {
do_SYSTEM();
df = lookup(id, GlobalScope, 1);
df = lookup(id, GlobalScope, 1, 0);
}
else {
extern int ForeignFlag;
@@ -115,7 +115,7 @@ GetDefinitionModule(id, incr)
if (!is_anon_idf(id) && GetFile(id->id_text)) {
DefModule();
df = lookup(id, GlobalScope, 1);
df = lookup(id, GlobalScope, 1, 0);
if (level == 1 &&
(!df || !(df->df_flags & D_FOREIGN))) {
/* The module is directly imported by
@@ -137,7 +137,7 @@ GetDefinitionModule(id, incr)
}
}
else {
df = lookup(id, GlobalScope, 1);
df = lookup(id, GlobalScope, 1, 0);
newsc->sc_name = id->id_text;
}
vis = CurrVis;