diff options
| author | Nagi5Yeq <wu@x-nagi.com> | 2020-05-30 18:27:16 +0800 |
|---|---|---|
| committer | Nagi5Yeq <wu@x-nagi.com> | 2020-05-30 18:27:16 +0800 |
| commit | fd21f31e654a97027799f0fdf3518fd639415121 (patch) | |
| tree | a88dd5a89899fd53909772795382c899b4ec014a /t | |
| parent | fb1fed0f275d1673cf6fb6c3887bc8919e1849d7 (diff) | |
add zeroinitializer for global variable
Diffstat (limited to 't')
| -rw-r--r-- | t/trivial.pas | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/t/trivial.pas b/t/trivial.pas index fb97adc..68e4a53 100644 --- a/t/trivial.pas +++ b/t/trivial.pas @@ -6,7 +6,10 @@ const gr=3.1415; gs='nagi'; var - gv:integer; + gvi:integer; + gvf:real; + gvp:^char; + gva:array[0..4] of integer; function arithmetic_test(a:integer;b:char;c:real):integer; var @@ -138,8 +141,8 @@ end; function name_test_global():integer; begin - gv:=1; - name_test_global:=gv+gb+gc+gi+gr+gs[3]; + gvi:=1; + name_test_global:=gvi+gb+gc+gi+gr+gs[3]; end; function name_test_local():integer; @@ -150,10 +153,10 @@ const gr=2.71828; gs='Hanjie Wu'; var - gv:integer; + gvi:integer; begin - gv:=0; - name_test_local:=gv+gb+gc+gi+gr+gs[3]; + gvi:=0; + name_test_local:=gvi+gb+gc+gi+gr+gs[3]; end; function name_test():boolean; |
