diff options
| author | dan <[email protected]> | 2023-05-29 16:08:47 -0400 |
|---|---|---|
| committer | dan <[email protected]> | 2023-05-29 16:08:47 -0400 |
| commit | 31dcdd0c68c6fa9d5ec69a1c025ead619e30e08e (patch) | |
| tree | 02926f0d4cc76ec9a2485159bb1def42cd7bfc22 /tests | |
| parent | eeca88e98212d7b61253b4be5f4ebb2f4b36e770 (diff) | |
| download | forth-31dcdd0c68c6fa9d5ec69a1c025ead619e30e08e.tar.gz forth-31dcdd0c68c6fa9d5ec69a1c025ead619e30e08e.tar.bz2 forth-31dcdd0c68c6fa9d5ec69a1c025ead619e30e08e.zip | |
tests: add lxiny-examples tests
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/lxiny-examples/arithmetic.forth | 10 | ||||
| -rw-r--r-- | tests/lxiny-examples/arithmetic2.forth | 10 | ||||
| -rw-r--r-- | tests/lxiny-examples/printall.forth | 5 | ||||
| -rw-r--r-- | tests/lxiny-examples/stack-manipulation.forth | 12 | ||||
| -rw-r--r-- | tests/lxiny-examples/stack-manipulation2.forth | 10 |
5 files changed, 47 insertions, 0 deletions
diff --git a/tests/lxiny-examples/arithmetic.forth b/tests/lxiny-examples/arithmetic.forth new file mode 100644 index 0000000..95eee8a --- /dev/null +++ b/tests/lxiny-examples/arithmetic.forth @@ -0,0 +1,10 @@ +INPUT +6 7 * . +1360 23 - . +12 12 / . +13 2 mod . +OUTPUT +42 +1337 +1 +1 diff --git a/tests/lxiny-examples/arithmetic2.forth b/tests/lxiny-examples/arithmetic2.forth new file mode 100644 index 0000000..a2212d3 --- /dev/null +++ b/tests/lxiny-examples/arithmetic2.forth @@ -0,0 +1,10 @@ +INPUT +99 negate .k +-99 abs . +52 23 max . +52 23 min . +OUTPUT +-99 +99 +52 +23 diff --git a/tests/lxiny-examples/printall.forth b/tests/lxiny-examples/printall.forth new file mode 100644 index 0000000..578f7e3 --- /dev/null +++ b/tests/lxiny-examples/printall.forth @@ -0,0 +1,5 @@ +INPUT +5 2 3 56 76 23 65 +.s +OUTPUT +<7> 5 2 3 56 76 23 65 diff --git a/tests/lxiny-examples/stack-manipulation.forth b/tests/lxiny-examples/stack-manipulation.forth new file mode 100644 index 0000000..1192bb9 --- /dev/null +++ b/tests/lxiny-examples/stack-manipulation.forth @@ -0,0 +1,12 @@ +INPUT +3 dup .s clearstack +2 5 swap .s clearstack +6 4 5 rot .s clearstack +4 0 drop .s clearstack +1 2 3 nip .s clearstack +OUTPUT +<2> 3 3 +<2> 5 2 +<3> 4 5 6 +<1> 4 +<2> 1 3 diff --git a/tests/lxiny-examples/stack-manipulation2.forth b/tests/lxiny-examples/stack-manipulation2.forth new file mode 100644 index 0000000..a154d40 --- /dev/null +++ b/tests/lxiny-examples/stack-manipulation2.forth @@ -0,0 +1,10 @@ +INPUT +1 2 3 4 tuck .s clearstack +1 2 3 4 over .s clearstack +1 2 3 4 2 roll .s clearstack +1 2 3 4 2 pick .s clearstack +OUTPUT +<5> 1 2 4 3 4 +<5> 1 2 3 4 3 +<4> 1 3 4 2 +<5> 1 2 3 4 2 |