Fix error typo

Please merge to 5.3.2
(cherry picked from commit d95be2ed4d)
This commit is contained in:
Asumu Takikawa 2013-01-10 12:17:21 -05:00 committed by Ryan Culpepper
parent 835aa575e5
commit e5ca4a4e4b

View File

@ -269,7 +269,7 @@
(define concrete-parent
(if (Poly? parent)
(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)
(length new-tvars))
(instantiate-poly parent (take new-tvars (Poly-n parent))))