From 9a0d7b419bd1cb1f1a1311dba66be7380d3d1c1d Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Thu, 6 Jan 2011 15:22:17 -0600 Subject: [PATCH] minor tweak to ->i's error message relevant to PR 11597 --- collects/racket/contract/private/arr-i-parse.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/racket/contract/private/arr-i-parse.rkt b/collects/racket/contract/private/arr-i-parse.rkt index 78788193cc..6a034f3c24 100644 --- a/collects/racket/contract/private/arr-i-parse.rkt +++ b/collects/racket/contract/private/arr-i-parse.rkt @@ -373,7 +373,7 @@ code does the parsing and validation of the syntax. [(a . b) (raise-syntax-error #f "expected a range expression" stx #'a)] [() - (raise-syntax-error #f "expected a range expression, but found nothing" stx leftover)])] + (raise-syntax-error #f "expected a range expression, but found nothing" stx)])] [(post-cond leftover) (syntax-case leftover () [(#:post (id ...) post-cond . leftover)