.
original commit: a7432874af0d8e8175b449832d45abee2b42fb99
This commit is contained in:
parent
d48c05550e
commit
26fcef0c0c
|
@ -1,11 +1,11 @@
|
||||||
|
|
||||||
(module imap mzscheme
|
(module imap mzscheme
|
||||||
(import (lib "unitsig.ss"))
|
(require (lib "unitsig.ss"))
|
||||||
|
|
||||||
(import "imap-sig.ss")
|
(require "imap-sig.ss")
|
||||||
(import "imap-unit.ss")
|
(require "imap-unit.ss")
|
||||||
|
|
||||||
(define-values/invoke-unit/sig net:imap^
|
(define-values/invoke-unit/sig net:imap^
|
||||||
net:imap@)
|
net:imap@)
|
||||||
|
|
||||||
(export-signature-elements net:imap^))
|
(provide-signature-elements net:imap^))
|
||||||
|
|
|
@ -1,11 +1,11 @@
|
||||||
|
|
||||||
(module smtp mzscheme
|
(module smtp mzscheme
|
||||||
(import (lib "unitsig.ss"))
|
(require (lib "unitsig.ss"))
|
||||||
|
|
||||||
(import "smtp-sig.ss")
|
(require "smtp-sig.ss")
|
||||||
(import "smtp-unit.ss")
|
(require "smtp-unit.ss")
|
||||||
|
|
||||||
(define-values/invoke-unit/sig net:smtp^
|
(define-values/invoke-unit/sig net:smtp^
|
||||||
net:smtp@)
|
net:smtp@)
|
||||||
|
|
||||||
(export-signature-elements net:smtp^))
|
(provide-signature-elements net:smtp^))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user