Updated tests.
h3rald h3rald@h3rald.com
Mon, 29 Jan 2024 11:29:25 +0100
3 files changed,
4 insertions(+),
4 deletions(-)
M
tests/dict.min
→
tests/dict.min
@@ -19,7 +19,7 @@ ({1 :a 2 :b 3 :c} dkeys ("a" "b" "c") ==) *test/assert
({1 :a 2 :b 3 :c} dvalues (1 2 3) ==) *test/assert - (ROOT dtype "module" ==) *test/assert + (global dtype "module" ==) *test/assert ({} dtype "" ==) *test/assert
M
tests/global.min
→
tests/global.min
@@ -20,7 +20,7 @@ (
:item "_$1" (item) => % :namesym item (dup *) cons namesym define - namesym ROOT publish + namesym global publish ) :def test-data def foreach@@ -62,7 +62,7 @@ ((2 3 >) ("YES") unless "YES" ==) *test/assert
(1 type "int" ==) *test/assert ({} type "dict" ==) *test/assert - (ROOT type "dict:module" ==) *test/assert + (global type "dict:module" ==) *test/assert (5 (dup 0 ==) (1 +) (dup 1 -) ( * ) linrec 120 ==) *test/assert ;factorial of 5
M
tests/logic.min
→
tests/logic.min
@@ -146,7 +146,7 @@ (4 'dict:module type? false ==) *test/assert
(logic 'dict:module type?) *test/assert (1 "int" type?) *test/assert ("test" "str" type?) *test/assert - (ROOT "dict:module" type?) *test/assert + (global "dict:module" type?) *test/assert (7 0 / inf ==) *test/assert (-7 0 / -inf ==) *test/assert