v0.3.4: set and say

This commit is contained in:
Luxferre
2026-07-07 10:54:04 +03:00
parent 9296bf2984
commit b1cd35d0ca
5 changed files with 24 additions and 4 deletions
+8
View File
@@ -78,6 +78,7 @@ if [
" Testing dot: " puts 123 . # Test dot
" Testing emit: " puts 65 emit cr # Test emit
" Testing space: " puts 65 emit space 66 emit cr # Test space
" Testing say: " puts say "hello from say"
" Testing readln: " puts
readln puts cr # Test readln
" Testing .s: " puts .s cr # Test .s
@@ -232,6 +233,13 @@ 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
set my_set_word [ 500 ]
my_set_word 500 =
set my_set_num 600
my_set_num 600 = and
set my_set_str "hello_set"
my_set_str "hello_set" streq and
if [ " set PASS" puts cr ] [ " set FAIL" puts cr ] # Test set
" _start PASS" puts cr # Test _start (executed via entry point)
# 11. Host Language Evaluation: hseval