From: ceriel <none@none>
Date: Fri, 15 Apr 1988 17:29:02 +0000 (+0000)
Subject: generate message about parameter count
X-Git-Tag: release-5-5~3420
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=d1c9c94493fea7241dd90b90bc3a2bc995985be6;p=ack.git

generate message about parameter count
---

diff --git a/lang/m2/comp/walk.c b/lang/m2/comp/walk.c
index b0b68e1f3..185c8f613 100644
--- a/lang/m2/comp/walk.c
+++ b/lang/m2/comp/walk.c
@@ -229,6 +229,7 @@ WalkProcedure(procedure)
 	/* Generate code for this procedure
 	*/
 	C_pro_narg(procscope->sc_name);
+	C_ms_par(procedure->df_type->prc_nbpar);
 	TmpOpen(procscope);
 	DoPriority();
 	DoFilename();		/* ??? only when this procedure is exported? */