original commit: 3eb894b9fceb6b67853410033d9276ace394a0e1
This commit is contained in:
Matthew Flatt 1998-07-18 16:29:32 +00:00
parent 768cdbb4f3
commit c41403f16b

View File

@ -478,7 +478,7 @@
(import (define-values))
(let () (define define-values 10) define-values)))
;; Invoke-unit linking in let-baound variables
;; Invoke-unit linking in let-bound variables
(test '(the-x 10) 'invoke/sig
(let ([x 'the-x])
(invoke-unit/sig