aboutsummaryrefslogtreecommitdiff
path: root/Testing/General/test-0.p
diff options
context:
space:
mode:
Diffstat (limited to 'Testing/General/test-0.p')
-rw-r--r--Testing/General/test-0.p27
1 files changed, 27 insertions, 0 deletions
diff --git a/Testing/General/test-0.p b/Testing/General/test-0.p
new file mode 100644
index 0000000..838d264
--- /dev/null
+++ b/Testing/General/test-0.p
@@ -0,0 +1,27 @@
+program main(input);
+ var a: integer;
+ var b: array[1 .. 10] of real;
+ var x: real;
+ function foo(x: integer; y: real):integer;
+ begin
+ foo := foo(x-1) + 1;
+ x := 13
+ end;
+begin
+ if ( x > 3.14 and x < 0.0 ) then
+ x := 1.0
+ else
+ x := 0.0
+end.
+
+
+
+
+
+
+
+
+
+
+
+