Added test for string processing.
Fabio Cevasco h3rald@h3rald.com
Fri, 03 Jan 2025 11:09:03 +0100
1 files changed,
4 insertions(+),
2 deletions(-)
jump to
M
scripts/test.hex
→
scripts/test.hex
@@ -221,8 +221,10 @@ ((() chr) (error) try "[symbol chr] Integer required" ==)
;120 ((dup *) "square" :: 0x2 square 0x4 == "square" #) - - + ( + "test\ntest\\ntest\t\"hello\"!" :str + str "test1.txt" write + "test1.txt" read str == "str" #) ) "tests" :