X-Git-Url: https://code.kerkeslager.com/?p=fur;a=blobdiff_plain;f=templates%2Ffunction_definition.c;fp=templates%2Ffunction_definition.c;h=ce869b29a5317bcbcbf0c6ccf07f96450e2f565c;hp=9af76327a69324a90de3aaeedc8fc4604e944fc5;hb=eec2a40d60e5f6a00b5013ef46d2ed2925f23da5;hpb=76ffe5adf4f6497945684e700dec15c809897d77

diff --git a/templates/function_definition.c b/templates/function_definition.c
index 9af7632..ce869b2 100644
--- a/templates/function_definition.c
+++ b/templates/function_definition.c
@@ -1,9 +1,8 @@
 
-Object user${{name}}$implementation(EnvironmentPool* environmentPool, Environment* environment, size_t argc, Stack* parentStack, jmp_buf parentJump)
+Object user${{name}}$implementation(EnvironmentPool* environmentPool, Environment* environment, size_t argc, Stack* stack, jmp_buf parentJump)
 {
   environment = Environment_construct(environmentPool, environment);
 
-  Stack* stack = Stack_construct();
   StackSnapshot stackSnapshot = Stack_takeSnapshot(stack);
 
   jmp_buf jump;
@@ -14,15 +13,13 @@ Object user${{name}}$implementation(EnvironmentPool* environmentPool, Environmen
     Stack_rewind(stack, stackSnapshot);
     Environment_setLive(environment, false);
 
-    Stack_destruct(stack);
-
     longjmp(parentJump, 1);
   }
 
   Object result = builtin$nil;
 
   {% for argument_name in argument_name_list|reverse %}
-  Environment_set(environment, "{{ argument_name }}", Stack_pop(parentStack));
+  Environment_set(environment, "{{ argument_name }}", Stack_pop(stack));
   {% endfor %}
 
   {% for statement in statement_list %}
@@ -31,7 +28,5 @@ Object user${{name}}$implementation(EnvironmentPool* environmentPool, Environmen
 
   // TODO Set the environment back to the parent environment
   Environment_setLive(environment, false);
-
-  Stack_destruct(stack);
   return result;
 }