12 lines
220 B
Scheme
12 lines
220 B
Scheme
|
|
(module smtp-sig mzscheme
|
|
(require (lib "unitsig.ss"))
|
|
|
|
(provide net:smtp^)
|
|
(define-signature net:smtp^
|
|
(smtp-sending-server
|
|
smtp-send-message
|
|
smtp-send-message*
|
|
smtp-sending-end-of-message)))
|
|
|