From: ceriel <none@none>
Date: Mon, 25 Apr 1988 12:55:25 +0000 (+0000)
Subject: generate scope info for functions
X-Git-Tag: release-5-5~3335
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=093a970d7ff9a4c78113eda14d7a4afc290bf51f;p=ack.git

generate scope info for functions
---

diff --git a/lang/cem/cemcom/code.c b/lang/cem/cemcom/code.c
index 1fb91cf69..13bde95ba 100644
--- a/lang/cem/cemcom/code.c
+++ b/lang/cem/cemcom/code.c
@@ -364,6 +364,11 @@ code_declaration(idf, expr, lvl, sc)
 		return;
 	if (sc == EXTERN && expr && !is_anon_idf(idf))
 		error("%s is extern; cannot initialize", idf->id_text);
+#ifndef USE_TMP
+	if (def->df_type->tp_fund == FUNCTION) {
+		code_scope(idf->id_text, def);
+	}
+#endif
 	if (lvl == L_GLOBAL)	{	/* global variable	*/
 		/* is this an allocating declaration? */
 		if (	(sc == 0 || sc == STATIC)