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

unbreak mzlib/contract's version of object-contract

Browse Source
This commit is contained in:
Robby Findler 2015-12-20 07:43:24 -06:00
parent f2236ea54b
commit f9f77329a7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compatibility-lib/mzlib/private/contract-object.rkt
View File

@ -287,7 +287,7 @@
#:projection #:projection
(lambda (blame) (lambda (blame)
(lambda (val) (lambda (val)
(make-wrapper-object ctc val blame (make-wrapper-object ctc val blame #f
(list 'method-name ...) (list method-ctc-var ...) (list 'method-name ...) (list method-ctc-var ...)
(list 'field-name ...) (list field-ctc-var ...)))) (list 'field-name ...) (list field-ctc-var ...))))
#:first-order #:first-order