diff options
Diffstat (limited to 'ecomp-c/test1.e')
-rw-r--r-- | ecomp-c/test1.e | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/ecomp-c/test1.e b/ecomp-c/test1.e index 28d2516..5648c9f 100644 --- a/ecomp-c/test1.e +++ b/ecomp-c/test1.e @@ -8,6 +8,7 @@ const // integer constant N, M : integer = 20; O : integer = N; + C : character = 'a'; // boolean constant INIT_STATE : boolean = true; @@ -22,7 +23,7 @@ var d, e, f : integer; flag : boolean; i : integer; - j : char; + j : character := C; begin a := 1; @@ -51,4 +52,6 @@ begin while ( i < 10 ) and not flag do i := i + 1; end; + + j := 'b'; end |