aboutsummaryrefslogtreecommitdiff
path: root/Testing/Semantic/t3-2.p
diff options
context:
space:
mode:
Diffstat (limited to 'Testing/Semantic/t3-2.p')
-rw-r--r--Testing/Semantic/t3-2.p8
1 files changed, 8 insertions, 0 deletions
diff --git a/Testing/Semantic/t3-2.p b/Testing/Semantic/t3-2.p
new file mode 100644
index 0000000..22f9b47
--- /dev/null
+++ b/Testing/Semantic/t3-2.p
@@ -0,0 +1,8 @@
+(* ERROR: test expressions in IF/WHILE statements must be Boolean *)
+program main( input, output );
+ var a: integer;
+begin
+ while a + 123 do
+ a := a + 1
+end.
+