v0.3.3: is lib word, UTF–8 string support

This commit is contained in:
Luxferre
2026-07-07 08:25:11 +03:00
parent 147089dc23
commit 6ccd7e7350
3 changed files with 16 additions and 1 deletions
+2
View File
@@ -226,6 +226,8 @@ my_inline 100 = if [ " :: (inline) PASS" puts cr ] [ " :: (inline) FAIL" puts
":: source_test_word [ 99 ]" "test_source.clx" writef drop source test_source.clx source_test_word 99 = if [ "test_source.clx" delf " source PASS" puts cr ] [ "test_source.clx" delf " source FAIL" puts cr ] # Test source
my_is_word is [ 200 ]
my_is_word 200 =
my_str_word is "abc"
my_str_word "abc" streq and
:: "my_inline_string_word" [ 400 ]
my_inline_string_word 400 = and
if [ " is PASS" puts cr ] [ " is FAIL" puts cr ] # Test is