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

correct a `raise-argument-error' conversion mistake

Browse Source
This commit is contained in:
Matthew Flatt 2012-05-25 18:37:06 -06:00
parent f00c1150fe
commit b7a8c0185b
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/racket/private/class-internal.rkt
View File

@ -3939,7 +3939,7 @@ An example
(define (do-make-object blame class by-pos-args named-args) (define (do-make-object blame class by-pos-args named-args)
(unless (class? class) (unless (class? class)
(raise-type-error 'instantiate "class?" class)) (raise-argument-error 'instantiate "class?" class))
;; make sure the class isn't abstract ;; make sure the class isn't abstract
(unless (null? (class-abstract-ids class)) (unless (null? (class-abstract-ids class))
(obj-error 'instantiate (obj-error 'instantiate