diff options
| author | dan <[email protected]> | 2023-05-29 11:05:20 -0400 |
|---|---|---|
| committer | dan <[email protected]> | 2023-05-29 11:05:20 -0400 |
| commit | 2455c38a09be3708062fef3e90bc006ab44dfacb (patch) | |
| tree | 7feaf3055fde3b4466887f7f080d374ed3ac6746 /tests | |
| parent | 8151ce5ffec4283a3bc1eeea52b8f9b17cb5d069 (diff) | |
| download | forth-2455c38a09be3708062fef3e90bc006ab44dfacb.tar.gz forth-2455c38a09be3708062fef3e90bc006ab44dfacb.tar.bz2 forth-2455c38a09be3708062fef3e90bc006ab44dfacb.zip | |
tests: add failing nested if test, make runtests.sh return exit code 1 on failure
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/nested-ifs.forth | 7 | ||||
| -rw-r--r-- | tests/nested-ifs2.forth | 8 | ||||
| -rw-r--r-- | tests/nested-ifs3.forth | 5 |
3 files changed, 20 insertions, 0 deletions
diff --git a/tests/nested-ifs.forth b/tests/nested-ifs.forth new file mode 100644 index 0000000..3b0b39c --- /dev/null +++ b/tests/nested-ifs.forth @@ -0,0 +1,7 @@ +INPUT +: f if 99 . if 88 . then 77 . then 66 . ; +0 1 f +OUTPUT +99 +77 +66 diff --git a/tests/nested-ifs2.forth b/tests/nested-ifs2.forth new file mode 100644 index 0000000..9fe1260 --- /dev/null +++ b/tests/nested-ifs2.forth @@ -0,0 +1,8 @@ +INPUT +: f if 99 . if 88 . then 77 . then 66 . ; +1 1 f +OUTPUT +99 +88 +77 +66 diff --git a/tests/nested-ifs3.forth b/tests/nested-ifs3.forth new file mode 100644 index 0000000..729229d --- /dev/null +++ b/tests/nested-ifs3.forth @@ -0,0 +1,5 @@ +INPUT +: f if 99 . if 88 . then 77 . then 66 . ; +0 0 f +OUTPUT +66 |