Artifact aceba0b116dc7864bd893b740b79738bf137bac6:

• File alice-test.fs — part of check-in [68570fd41a] at 2014-08-06 23:20:35 on branch trunk — Start of message protocol (user: bernd size: 421)

\ net2o tests - client side

require net2o.fs
require client-tests.fs

+db stat(
+debug
%droprate
script? [IF] debug-task [THEN]
test-keys \ we want the test keys - never use this in production!

i'm alice

init-client

!time

?nextarg [IF] net2o-host $! [THEN]
?nextarg [IF] s>number drop to net2o-port [THEN]

\ ?nextarg [IF] s>number drop [ELSE] 1 [THEN] c:tests

script? [IF] "bob" nat:connect c:test-rest bye [THEN]