Login
7 branches 0 tags
Ben (X13/Arch) Fixed benchmark script 684c711 3 years ago 920 Commits
nujel / tests / testsuite / ports.nuj
["asd" [with-string-port p [p 'block-write "asd"]]]
["asd" [with-string-port p [p 'write "a" "s" "d"]]]
["asd" [with-string-port p [p 'write "a" "sd"]]]
["asd" [with-string-port p [p 'write "as" "d"]]]
["asd" [with-string-port p [p 'write "as"] [p 'char-write #x64]]]
["abc" [with-string-port p [p 'char-write #x61] [p 'char-write #x62] [p 'char-write #x63]]]
["abcdef" [with-string-port p [p 'char-write #x61] [p 'char-write #x62] [p 'char-write #x63] [p 'write "def"]]]