From 04f0550f1d2381fdcf1d0e370b1aa9711357f189 Mon Sep 17 00:00:00 2001 From: ceriel Date: Tue, 27 Oct 1987 09:45:27 +0000 Subject: [PATCH] do not warn about not using a type-identifier that indicates an enumeration type and is imported, because its enumeration literals might be used --- lang/m2/comp/enter.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lang/m2/comp/enter.c b/lang/m2/comp/enter.c index c3f12db7f..90a2c0678 100644 --- a/lang/m2/comp/enter.c +++ b/lang/m2/comp/enter.c @@ -240,8 +240,9 @@ DoImport(df, scope, kind) /* Definition "df" is imported to scope "scope". Handle the case that it is an enumeration type or a module. */ + register t_def *idef = define(df->df_idf, scope, kind); - define(df->df_idf, scope, kind)->imp_def = df; + idef->imp_def = df; while (df->df_kind & D_IMPORTED) { df = df->imp_def; @@ -258,6 +259,7 @@ DoImport(df, scope, kind) are not used */ } + idef->df_flags |= D_USED; /* don't complain ... */ } else if (df->df_kind == D_MODULE) { /* Also import all definitions that are exported from this @@ -280,6 +282,7 @@ DoImport(df, scope, kind) /* don't complain when these are not used */ } } + idef->df_flags |= D_USED; /* don't complain ... */ } } -- 2.34.1