From 2be8437d73575961beda0910fe154f842f32ca82 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Thu, 31 Mar 1988 16:09:53 +0000
Subject: [PATCH] identifiers may not contain two consecutive underscores, and
 a fix

---
 lang/m2/comp/walk.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lang/m2/comp/walk.c b/lang/m2/comp/walk.c
index a8b0b0982..bc7fb0de9 100644
--- a/lang/m2/comp/walk.c
+++ b/lang/m2/comp/walk.c
@@ -229,9 +229,9 @@ WalkProcedure(procedure)
 	/* Generate code for this procedure
 	*/
 	C_pro_narg(procscope->sc_name);
+	TmpOpen(procscope);
 	DoPriority();
 	DoFilename();		/* ??? only when this procedure is exported? */
-	TmpOpen(procscope);
 
 	func_type = tp = RemoveEqual(ResultType(procedure->df_type));
 
-- 
2.34.1