summaryrefslogtreecommitdiff
path: root/ecomp-c/test1.e
diff options
context:
space:
mode:
Diffstat (limited to 'ecomp-c/test1.e')
-rw-r--r--ecomp-c/test1.e9
1 files changed, 6 insertions, 3 deletions
diff --git a/ecomp-c/test1.e b/ecomp-c/test1.e
index 3ad3bac..f18f847 100644
--- a/ecomp-c/test1.e
+++ b/ecomp-c/test1.e
@@ -8,10 +8,13 @@ const
// integer constant
N, M : integer = 20;
O : integer = N;
- C : character = 'a';
+ C : character = 'A';
// boolean constant
INIT_STATE : boolean = true;
+
+ // string constant
+ S : array 5 of character = "hello";
var
// this is an integer
@@ -24,7 +27,7 @@ var
flag : boolean;
i : integer;
j : character := C;
- s : array 100 of character;
+ s : array 5 of character := S;
begin
a := 1;
@@ -54,5 +57,5 @@ begin
i := i + 1;
end;
- j := 'b';
+ j := 'B';
end