.
original commit: c6c78420724ccf3c3d4c83399d56ab5eb3363cfc
This commit is contained in:
commit
d48c05550e
|
@ -1,8 +1,11 @@
|
|||
|
||||
(require-relative-library "imaps.ss")
|
||||
(module imap mzscheme
|
||||
(import (lib "unitsig.ss"))
|
||||
|
||||
(begin-elaboration-time
|
||||
(require-library "invoke.ss"))
|
||||
(import "imap-sig.ss")
|
||||
(import "imap-unit.ss")
|
||||
|
||||
(define-values/invoke-unit/sig mzlib:imap^
|
||||
(require-relative-library "imapr.ss"))
|
||||
(define-values/invoke-unit/sig net:imap^
|
||||
net:imap@)
|
||||
|
||||
(export-signature-elements net:imap^))
|
||||
|
|
|
@ -1,8 +1,11 @@
|
|||
|
||||
(require-relative-library "smtps.ss")
|
||||
(module smtp mzscheme
|
||||
(import (lib "unitsig.ss"))
|
||||
|
||||
(begin-elaboration-time
|
||||
(require-library "invoke.ss"))
|
||||
(import "smtp-sig.ss")
|
||||
(import "smtp-unit.ss")
|
||||
|
||||
(define-values/invoke-unit/sig mzlib:smtp^
|
||||
(require-relative-library "smtpr.ss"))
|
||||
(define-values/invoke-unit/sig net:smtp^
|
||||
net:smtp@)
|
||||
|
||||
(export-signature-elements net:smtp^))
|
||||
|
|
Loading…
Reference in New Issue
Block a user