suzanne.soy/compatibility
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

.

Browse Source 
original commit: 0f05d92f23b99aff799e87fdc39c4e8ccc908797
This commit is contained in:
Matthew Flatt 2001-04-08 12:50:42 +00:00
parent 330cd32e9e
commit 67190038b1
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/mzlib/unitsig.ss
View File

@ -8,7 +8,7 @@
(require-for-syntax "private/sigmatch.ss") (require-for-syntax "private/sigmatch.ss")
(require-for-syntax (lib "kerncase.ss" "syntax")) (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 (define-syntax define-signature
(lambda (expr) (lambda (expr)
@ -310,6 +310,8 @@
invoke-unit/sig invoke-unit/sig
unit->unit/sig unit->unit/sig
signature->symbols signature->symbols
(struct unit/sig (unit imports exports))
define-values/invoke-unit/sig define-values/invoke-unit/sig
global-define-values/invoke-unit/sig global-define-values/invoke-unit/sig