From 36a5618dc832add30ca54ac48dc171ce6e4dbd5e Mon Sep 17 00:00:00 2001 From: ceriel Date: Fri, 17 Jul 1987 14:30:30 +0000 Subject: [PATCH] do not generate mes 11 AND mes 3! --- lang/cem/cemcom/code.c | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lang/cem/cemcom/code.c b/lang/cem/cemcom/code.c index dc2ffd3b9..0031317d3 100644 --- a/lang/cem/cemcom/code.c +++ b/lang/cem/cemcom/code.c @@ -249,6 +249,7 @@ end_proc(fbytes) - "end" + number of bytes used for local variables */ arith nbytes; + char optionsn = options['n']; #ifdef DATAFLOW if (options['d']) @@ -280,6 +281,7 @@ end_proc(fbytes) #endif C_ms_par(fbytes); /* # bytes for formals */ if (sp_occurred[SP_SETJMP]) { /* indicate use of "setjmp" */ + options['n'] = 1; C_ms_gto(); sp_occurred[SP_SETJMP] = 0; } @@ -288,6 +290,7 @@ end_proc(fbytes) #endif LocalFinish(); C_end(nbytes); + options['n'] = optionsn; } do_return() -- 2.34.1