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

typo: 'an mutable' => 'a mutable'

Browse Source
This commit is contained in:
Ben Greenman 2017-05-21 02:00:00 -04:00
parent f175148ca3
commit b36c35ac7e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
racket/collects/racket/contract/private/vector.rkt
View File

@ -63,7 +63,7 @@
(fail val '(expected "an immutable vector" given: "~e") val))] (fail val '(expected "an immutable vector" given: "~e") val))]
[(eq? immutable #f) [(eq? immutable #f)
(when (immutable? val) (when (immutable? val)
(fail val '(expected "an mutable vector" given: "~e") val))] (fail val '(expected "a mutable vector" given: "~e") val))]
[else (void)]) [else (void)])
(when first-order? (when first-order?
(let loop ([n 0]) (let loop ([n 0])
@ -93,7 +93,7 @@
(cond (cond
[(immutable? val) [(immutable? val)
(raise-blame-error blame #:missing-party neg-party (raise-blame-error blame #:missing-party neg-party
val '(expected "an mutable vector" given: "~e") val)] val '(expected "a mutable vector" given: "~e") val)]
[else #f])] [else #f])]
[else #f])] [else #f])]
[else [else