diff --git a/collects/scheme/private/define-struct.ss b/collects/scheme/private/define-struct.ss index 38b93e6ae5..c6e7b48ae9 100644 --- a/collects/scheme/private/define-struct.ss +++ b/collects/scheme/private/define-struct.ss @@ -107,7 +107,7 @@ #f (if (keyword? (syntax-e (car ps))) "unrecognized field-specification keyword" - "expected a field-spefication keyword") + "expected a field-specification keyword") stx (car ps))]))] [_else @@ -401,4 +401,4 @@ 'disappeared-use (syntax-local-introduce super-id)) result)))))))))]))) - \ No newline at end of file +