From 88471f94f0d025a34e96864378fec8a309f0d12b Mon Sep 17 00:00:00 2001
From: David Schmenk <dschmenk@gmail.com>
Date: Sat, 27 Jan 2018 19:23:41 -0800
Subject: [PATCH] Fix LEAVE for lambda funcs

---
 src/toolsrc/codegen.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/toolsrc/codegen.c b/src/toolsrc/codegen.c
index 2a7459e..c8eb630 100755
--- a/src/toolsrc/codegen.c
+++ b/src/toolsrc/codegen.c
@@ -512,7 +512,7 @@ void emit_lambdafunc(int tag, char *name, int cparams, t_opseq *lambda_seq)
     emit_seq(lambda_seq);
     emit_pending_seq();
     if (cparams)
-        printf("\t%s\t$5A\t\t\t; LEAVE\n", DB);
+        printf("\t%s\t$5A,$%02X\t\t\t; LEAVE\t%d\n", DB, cparams*2, cparams*2);
     else
         printf("\t%s\t$5C\t\t\t; RET\n", DB);
 }