Loading client-tests.fs +2 −2 Original line number Diff line number Diff line Loading @@ -115,12 +115,12 @@ previous net2o-code expect-reply !time .time s" Download test " $, type 1 lit, . pi float, f. cr ( see-me ) get-ip 0 lit, file-id 0 lit, words push' cr endwith ( see-me ) get-ip 0 lit, $400 blocksize! $400 blockalign! stat( request-stats ) "net2o.fs" "net2o.fs" >cache n2o:copy "data/2011-05-13_11-26-57-small.jpg" "photo000s.jpg" >cache n2o:copy "data/2011-05-20_17-01-12-small.jpg" "photo001s.jpg" >cache n2o:copy n2o:done n2o:done words push' cr end-code| n2o:close-all ['] .time $err ; : c:download2 ( -- ) Loading Loading
client-tests.fs +2 −2 Original line number Diff line number Diff line Loading @@ -115,12 +115,12 @@ previous net2o-code expect-reply !time .time s" Download test " $, type 1 lit, . pi float, f. cr ( see-me ) get-ip 0 lit, file-id 0 lit, words push' cr endwith ( see-me ) get-ip 0 lit, $400 blocksize! $400 blockalign! stat( request-stats ) "net2o.fs" "net2o.fs" >cache n2o:copy "data/2011-05-13_11-26-57-small.jpg" "photo000s.jpg" >cache n2o:copy "data/2011-05-20_17-01-12-small.jpg" "photo001s.jpg" >cache n2o:copy n2o:done n2o:done words push' cr end-code| n2o:close-all ['] .time $err ; : c:download2 ( -- ) Loading