summaryrefslogtreecommitdiff
path: root/ecomp-c/tests/procedure_call_value_parameters.e
diff options
context:
space:
mode:
Diffstat (limited to 'ecomp-c/tests/procedure_call_value_parameters.e')
-rw-r--r--ecomp-c/tests/procedure_call_value_parameters.e6
1 files changed, 3 insertions, 3 deletions
diff --git a/ecomp-c/tests/procedure_call_value_parameters.e b/ecomp-c/tests/procedure_call_value_parameters.e
index 3b100ed..f0d6372 100644
--- a/ecomp-c/tests/procedure_call_value_parameters.e
+++ b/ecomp-c/tests/procedure_call_value_parameters.e
@@ -5,14 +5,14 @@
module procedure_call_value_parameters;
var
- i : integer := 0;
-
+ i : integer := 1;
+
procedure proc( x : integer );
var
l : integer;
begin
l := x;
- i := x;
+ i := l;
end
begin