1 ce3d3a8f 2021-08-12 op include "lib.9ps"
 2 ce3d3a8f 2021-08-12 op 
 3 ce3d3a8f 2021-08-12 op testing "if version works" dir "./root" {
 4 ce3d3a8f 2021-08-12 op 	send(Tversion, notag, msize, np2000)
 5 ce3d3a8f 2021-08-12 op 	m = recv()
 6 ce3d3a8f 2021-08-12 op 	assert m.type == Rversion
 7 ce3d3a8f 2021-08-12 op }
 8 ce3d3a8f 2021-08-12 op 
 9 ce3d3a8f 2021-08-12 op testing "fails when sending a R-message" dir "./root" {
10 ce3d3a8f 2021-08-12 op 	send(Rversion, notag, msize, np2000)
11 ce3d3a8f 2021-08-12 op 	should-fail recv() : "the connection should have been closed"
12 ce3d3a8f 2021-08-12 op }