Test output for tagged-netstring
Testing time: 8.0s
CHICKEN_INSTALL_PREFIX=/root/src/salmonella/salmonella-4.5.0/repo CHICKEN_INCLUDE_PATH=/root/src/salmonella/salmonella-4.5.0/repo/share/chicken CHICKEN_REPOSITORY=/root/src/salmonella/salmonella-4.5.0/repo/lib/chicken/5 /usr/local/chicken-4.5.0/bin/csi -script run.scm reading strings ...................................................... [ PASS] wrting strings ....................................................... [ PASS] -- testing integers ---------------------------------------------------------- 42 ................................................................... [ PASS] 2:42# ................................................................ [ PASS] (with-input-from-string "3:xxx#" tagged-netstring#tagged-netstr... ... [ PASS] 3 tests completed in 0.004 seconds. 3 out of 3 (100%) tests passed. -- done testing integers ----------------------------------------------------- -- testing booleans ---------------------------------------------------------- #t ................................................................... [ PASS] 4:true! .............................................................. [ PASS] #f ................................................................... [ PASS] 5:false! ............................................................. [ PASS] (with-input-from-string "2:no!" tagged-netstring#tagged-netstri... ... [ PASS] 5 tests completed in 0 seconds. 5 out of 5 (100%) tests passed. -- done testing booleans ----------------------------------------------------- -- testing lists ------------------------------------------------------------- #() .................................................................. [ PASS] 0:] .................................................................. [ PASS] #(x) ................................................................. [ PASS] 4:1:x,] .............................................................. [ PASS] #(foo #(bar baz) qux) ................................................ [ PASS] 28:3:foo,12:3:bar,3:baz,]3:qux,] ..................................... [ PASS] (with-input-from-string "10:foo]" tagged-netstring#tagged-netst... ... [ PASS] 7 tests completed in 0.001 seconds. 7 out of 7 (100%) tests passed. -- done testing lists -------------------------------------------------------- -- testing dicts ------------------------------------------------------------- () ................................................................... [ PASS] 0:} .................................................................. [ PASS] ((foo (bar . 123))) .................................................. [ PASS] 22:3:foo,12:3:bar,3:123#}} ........................................... [ PASS] (with-input-from-string "12:3:123#3:foo,}" tagged-netstring#tag... ... [ PASS] 5 tests completed in 0.003 seconds. 5 out of 5 (100%) tests passed. -- done testing dicts --------------------------------------------------------