diff options
Diffstat (limited to 'js/scripting-lang/scratch_tests/test_debug_equals.txt')
-rw-r--r-- | js/scripting-lang/scratch_tests/test_debug_equals.txt | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/js/scripting-lang/scratch_tests/test_debug_equals.txt b/js/scripting-lang/scratch_tests/test_debug_equals.txt new file mode 100644 index 0000000..da3e0cd --- /dev/null +++ b/js/scripting-lang/scratch_tests/test_debug_equals.txt @@ -0,0 +1,26 @@ +/* Debug test for equals function */ + +/* Test equals directly */ +result1 : equals 5 3; +..out "equals 5 3:"; +..out result1; + +result2 : equals 0 0; +..out "equals 0 0:"; +..out result2; + +/* Test is_zero function */ +is_zero : x -> equals x 0; +result3 : is_zero 0; +..out "is_zero 0:"; +..out result3; + +result4 : is_zero 5; +..out "is_zero 5:"; +..out result4; + +/* Test map with is_zero */ +test_values : {0, 1, 2}; +zero_test : map @is_zero test_values; +..out "map @is_zero {0, 1, 2}:"; +..out zero_test; \ No newline at end of file |