1 files changed, 24 insertions, 0 deletions
diff --git a/ecomp-c/tests/procedure_local_variables.e b/ecomp-c/tests/procedure_local_variables.e
new file mode 100644
index 0000000..2838203
--- /dev/null
+++ b/ecomp-c/tests/procedure_local_variables.e
@@ -0,0 +1,24 @@
+/*
+ * procedure call with local variables
+ */
+
+module procedure_call;
+
+var
+	i : integer := 0;
+	
+procedure proc;
+const
+	C : integer = 42;
+var
+	j : integer;
+	k : integer := C;
+	
+begin
+	j := i;
+	i := k;
+end
+
+begin
+	proc;
+end