12 lines
319 B
Scheme
12 lines
319 B
Scheme
|
|
(module embed-sig mzscheme
|
|
(require (lib "unitsig.ss"))
|
|
(provide compiler:embed^)
|
|
|
|
(define-signature compiler:embed^
|
|
(make-embedding-executable
|
|
write-module-bundle
|
|
embedding-executable-is-directory?
|
|
embedding-executable-put-file-extension+style+filters
|
|
embedding-executable-add-suffix)))
|