From ce30687ec6fa199289505463e73ea87db447eec8 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Fri, 6 Oct 2017 09:50:18 -0500 Subject: [PATCH] fix construction of test case failure message --- pkgs/racket-test/tests/racket/contract/test-util.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pkgs/racket-test/tests/racket/contract/test-util.rkt b/pkgs/racket-test/tests/racket/contract/test-util.rkt index 1237139dc6..2a8751ccf2 100644 --- a/pkgs/racket-test/tests/racket/contract/test-util.rkt +++ b/pkgs/racket-test/tests/racket/contract/test-util.rkt @@ -409,7 +409,7 @@ (let-values ([(base name dir) (split-path src)]) (format "~a" name)) (format "~s" src))) - #`(test/no-error/proc #,fn #,(syntax-source stx) arg))])) + #`(test/no-error/proc #,fn #,(syntax-line stx) arg))])) (define (test/no-error/proc fn line sexp) (contract-eval