From acccf9c06affb73bc50abda6fe1dda4363f0168e Mon Sep 17 00:00:00 2001 From: Asumu Takikawa Date: Thu, 10 Jan 2013 12:17:21 -0500 Subject: [PATCH] Fix error typo Please merge to 5.3.2 original commit: d95be2ed4de0f3b1554b91361482e16d67d447ea --- collects/typed-racket/typecheck/tc-structs.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/typed-racket/typecheck/tc-structs.rkt b/collects/typed-racket/typecheck/tc-structs.rkt index 34a416bb..0f54e17e 100644 --- a/collects/typed-racket/typecheck/tc-structs.rkt +++ b/collects/typed-racket/typecheck/tc-structs.rkt @@ -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))))