Abbreviation for the paper

This commit is contained in:
Tony Garnock-Jones 2012-08-15 15:47:32 -04:00
parent 0c07fb3b0e
commit 581eafbb11
1 changed files with 3 additions and 2 deletions

View File

@ -10,6 +10,8 @@
(with-output-to-bytes
(lambda () (write v) (newline))))
(define tcp tcp-driver)
;;---------------------------------------------------------------------------
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@ -62,6 +64,5 @@
[msg (at-meta-level
(cout (term->bytes msg)))])))
(ground-vm (spawn tcp-driver)
(spawn listener))
(ground-vm (spawn tcp) (spawn listener))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;