original commit: 0f05d92f23b99aff799e87fdc39c4e8ccc908797
This commit is contained in:
Matthew Flatt 2001-04-08 12:50:42 +00:00
parent 330cd32e9e
commit 67190038b1

View File

@ -8,7 +8,7 @@
(require-for-syntax "private/sigmatch.ss")
(require-for-syntax (lib "kerncase.ss" "syntax"))
(define-struct/export unit/sig (unit imports exports))
(define-struct unit/sig (unit imports exports))
(define-syntax define-signature
(lambda (expr)
@ -311,6 +311,8 @@
unit->unit/sig
signature->symbols
(struct unit/sig (unit imports exports))
define-values/invoke-unit/sig
global-define-values/invoke-unit/sig
provide-signature-elements))