1 files changed, 1 insertions, 1 deletions
diff --git a/pc.y b/pc.y
index dc6a05b..f00d4fe 100644
--- a/pc.y
+++ b/pc.y
@@ -159,6 +159,7 @@ sub_prog_declaration
 	 sub_prog_declarations
 	 compound_statement
 	{
+		pop_scope(&cur_scope);
 	}
 ;
 
@@ -171,7 +172,6 @@ sub_prog_head
 
 		cur_scope->ret_var = scope_insert(cur_scope, $2);
 		cur_scope->ret_var->var_type = $5;
-
 	}
 	|PROC ID arguments ';'
 	{