Anonymous user
Chat server: Difference between revisions
m
Ol: removed deprecated function call
(Adding R implementation) |
m (Ol: removed deprecated function call) |
||
Line 2,261:
=={{header|Ol}}==
<lang scheme>
(define (timestamp) (syscall 201 "%c"))
Line 2,326 ⟶ 2,325:
;(print "\n# " (timestamp) ": new request from " (syscall 51 fd))
(fork (on-accept (syscall 51 fd) fd))))
(
(loop))))
Line 2,385 ⟶ 2,384:
(127.0.0.1 . 55320): see you..
</pre>
=={{header|Perl}}==
|