7 lines
126 B
Scheme
7 lines
126 B
Scheme
(module tcp-unit mzscheme
|
|
(provide tcp@)
|
|
|
|
(require (lib "unit.ss") "tcp-sig.ss")
|
|
|
|
(define-unit-from-context tcp@ tcp^))
|