hworld.wsm

# data
store 0 "Hello, world of spaces!"

# p = 0
push 0

label 3 # beginning

# *p
dup
retrieve

# if (*p)
dup
jumpz 23 # exit

# write(*p)
write_char

# p++
push 1
add

jump 3 # beginning

label 23 # exit
write_char 10
write_char 13
exit