Some corrections and additions to improve the mechanism for

generating warnings on unused/uninitialized variables
1987-10-21 11:29:52 +00:00
parent b324cc9813
commit 8ddea7afe0
14 changed files with 92 additions and 63 deletions
--- a/lang/m2/comp/program.g
+++ b/lang/m2/comp/program.g
@@ -101,7 +101,9 @@ import(int local;)
 } :
 	[ FROM
 	  IDENT		{ FromId = dot2leaf(Name);
-			  if (local) df = lookfor(FromId,enclosing(CurrVis),0);
+			  if (local) {
+				df = lookfor(FromId,enclosing(CurrVis),0,D_USED);
+			  }
 			  else df = GetDefinitionModule(dot.TOK_IDF, 1);
 			}
 	]?