aboutsummaryrefslogtreecommitdiff
path: root/check/code-gen/ifs.p
diff options
context:
space:
mode:
authorTucker Evans <tuckerevans24@gmail.com>2019-10-09 01:01:57 -0400
committerTucker Evans <tuckerevans24@gmail.com>2019-10-09 01:01:57 -0400
commitdfd4c9b09885fef5dff326925cceae44e49455b0 (patch)
treed09bae8528a80c0ac509b683f548f07f0e1c8814 /check/code-gen/ifs.p
parent64fbe9da1ab872b27b5f4dd3b46eb1a7b69d8245 (diff)
Update check files
Diffstat (limited to 'check/code-gen/ifs.p')
-rw-r--r--check/code-gen/ifs.p37
1 files changed, 37 insertions, 0 deletions
diff --git a/check/code-gen/ifs.p b/check/code-gen/ifs.p
new file mode 100644
index 0000000..533eadc
--- /dev/null
+++ b/check/code-gen/ifs.p
@@ -0,0 +1,37 @@
+program main ();
+ var a,b,c,d,e,f,g,h,i,j,k,l,m,n,o: integer;
+ var rb,rc,rd,re,rf,rg,rh,ri,rj,rk,rl,rm,rn,ro: real;
+begin
+ a := 0;
+ if ( 1 = 2 ) then b:= 1;
+ if ( 1.1 = 2.1 ) then c:=0;
+ b := 1;
+ c := 1;
+ d := 1;
+ e := 1;
+ f := 1;
+ g := 1;
+ h := 1;
+ i := 1;
+ j := 1;
+ k := 1;
+ l := 1;
+ m := 1;
+ n := 1;
+ o := 1;
+
+ rb := 1.0;
+ rc := 1.0;
+ rd := 1.0;
+ re := 1.0;
+ rf := 1.0;
+ rg := 1.0;
+ rh := 1.0;
+ ri := 1.0;
+ rj := 1.0;
+ rk := 1.0;
+ rl := 1.0;
+ rm := 1.0;
+ rn := 1.0;
+ ro := 1.0
+end.