Fix error typo
Please merge to 5.3.2
This commit is contained in:
parent
2c8e5f9acb
commit
d95be2ed4d
|
@ -269,7 +269,7 @@
|
||||||
(define concrete-parent
|
(define concrete-parent
|
||||||
(if (Poly? parent)
|
(if (Poly? parent)
|
||||||
(if (> (Poly-n parent) (length new-tvars))
|
(if (> (Poly-n parent) (length new-tvars))
|
||||||
(tc-error "Could not instantiate parent struct type. Required ~a type variables, recieved ~a."
|
(tc-error "Could not instantiate parent struct type. Required ~a type variables, received ~a."
|
||||||
(Poly-n parent)
|
(Poly-n parent)
|
||||||
(length new-tvars))
|
(length new-tvars))
|
||||||
(instantiate-poly parent (take new-tvars (Poly-n parent))))
|
(instantiate-poly parent (take new-tvars (Poly-n parent))))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user