1 files changed, 4 insertions, 0 deletions
diff --git a/ecomp-c/test1.e b/ecomp-c/test1.e
index b5c5edc..a9fbbe8 100644
--- a/ecomp-c/test1.e
+++ b/ecomp-c/test1.e
@@ -32,14 +32,18 @@ var
 	s2 : array 10 of character := "hello";
 	a1 : array 10 of integer;
 
+procedure B;
+
 procedure A;
 begin
 	a1[5] := 43;
+	B;
 end
 
 procedure B;
 begin
 	a1[4] := 44;
+	A;
 end
 
 begin