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

Yeah, accessors need arguments.

Browse Source 
svn: r18281
This commit is contained in:
Stevie Strickland 2010-02-23 00:46:47 +00:00
parent cfdb9dd39b
commit f1b0bfdd79
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/scheme/private/class-internal.ss
View File

@ -3040,7 +3040,7 @@
(failed "no public field ~a" m)))))))
(define (object/c-check-first-order ctc obj blame)
(check-object-contract obj blame (object/c-methods) (object/c-fields)))
(check-object-contract obj blame (object/c-methods ctc) (object/c-fields ctc)))
(define (object/c-proj ctc)
(λ (blame)