Added warning for initializer of formal parameter (the syntax allows this!)

diff --git a/lang/cem/cemcom/declar.g b/lang/cem/cemcom/declar.g
index dc24efd..a858273 100644 (file)
--- a/lang/cem/cemcom/declar.g
+++ b/lang/cem/cemcom/declar.g
@@ -193,6 +193,8 @@ initializer(struct idf *idf; int sc;)
                        error("illegal initialization of function");
                        idf->id_def->df_type->tp_fund = ERRONEOUS;
                }
+               if (level == L_FORMAL2)
+                       warning("illegal initialization of formal parameter (ignored)");
        }
        [
                '='