removed useless strlen from stdlib.sl
This commit is contained in:
@@ -2,11 +2,10 @@ import stdlib/stdlib.sl
|
||||
import stdlib/io.sl
|
||||
|
||||
: main
|
||||
"/tmp/l2_test_write.txt" # push path (len addr)
|
||||
swap # -> (addr len) = path_ptr path_len
|
||||
"hello from write_file test\n" # push buf (len addr)
|
||||
swap # -> (addr len) = buf_ptr buf_len
|
||||
2swap # reorder pairs -> path_ptr path_len buf_ptr buf_len
|
||||
"/tmp/l2_test_write.txt" # push path (len addr)
|
||||
swap # -> (addr len) = path_ptr path_len
|
||||
write_file
|
||||
dup 0 > if
|
||||
"wrote bytes: " puts
|
||||
|
||||
Reference in New Issue
Block a user