diff options
Diffstat (limited to 'check/type/bool/fail-while.p')
| -rw-r--r-- | check/type/bool/fail-while.p | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/check/type/bool/fail-while.p b/check/type/bool/fail-while.p new file mode 100644 index 0000000..b02048d --- /dev/null +++ b/check/type/bool/fail-while.p @@ -0,0 +1,7 @@ +program main ( input, output ); + var a: integer; +begin + while (1) + do + a:= 0 +end. |