minor fixes

diff --git a/lang/m2/comp/LLlex.c b/lang/m2/comp/LLlex.c
index 047aa5d..4ba4659 100644 (file)
--- a/lang/m2/comp/LLlex.c
+++ b/lang/m2/comp/LLlex.c
@@ -427,6 +427,7 @@ again:
                                }
                                else {
                                        state = End;
+                                       ch = 'D';
                                        PushBack();
                                }
                                break;

diff --git a/lang/m2/comp/walk.c b/lang/m2/comp/walk.c
index 0c23bf7..180494d 100644 (file)
--- a/lang/m2/comp/walk.c
+++ b/lang/m2/comp/walk.c
@@ -872,8 +872,11 @@ UseWarnings(df)
                                        node_warning(
                                                df->df_scope->sc_end,
                                                W_ORDINARY,
-                                               "identifier \"%s\" imported but not used/assigned",
-                                               df->df_idf->id_text);
+                                               "identifier \"%s\" imported but not %s",
+                                               df->df_idf->id_text,
+                                               df1->df_kind == D_VARIABLE ?
+                                                       "used/assigned" :
+                                                       "used");
                                }
                                return;
                        }