aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

June 2018 Update

Browse source
This commit is contained in:
Ingy döt Net 2018-06-22 20:57:24 +00:00
parent ba8067c3b7
commit 22f33d4004
5278 changed files with 84726 additions and 14379 deletions
Download patch file Download diff file Expand all files Collapse all files

10
Task/Echo-server/Aime/echo-server.aime
View file

@ -19,7 +19,7 @@ readc(dispatch w, file i, file o, data b)
b_rule(b, -1, t, 0, e);
f_data(o, b);
w_register(w, o);
b_bill(b, t, e, ~t - e);
b_ecopy(b, t, e, ~t - e);
} else {
b_add(b, t);
}
@ -34,7 +34,7 @@ serve(dispatch w, file s)
data b;
accept(i, o, s, NONBLOCKING_INPUT | NONBLOCKING_OUTPUT);
w_watch(w, i, readc, w, i, o, b);
w.watch(i, readc, w, i, o, b);
}
integer
@ -44,8 +44,8 @@ main(void)
file s;
tcpip_listen(s, 12321, 0);
w_watch(w, s, serve, w, s);
w_press(w);
w.watch(s, serve, w, s);
w.press;
return 0;
0;
}