From fdc033474a2f5365abf69acd6ec95a48a43ec16d Mon Sep 17 00:00:00 2001 From: nocheroot Date: Mon, 21 May 2018 12:41:13 -0500 Subject: [PATCH] Fix typos in test.rkt --- pkgs/racket-test/tests/pkg/test.rkt | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/pkgs/racket-test/tests/pkg/test.rkt b/pkgs/racket-test/tests/pkg/test.rkt index 1f36114fb6..2a7590e599 100644 --- a/pkgs/racket-test/tests/pkg/test.rkt +++ b/pkgs/racket-test/tests/pkg/test.rkt @@ -15,16 +15,16 @@ (define f (syntax->datum f-stx)) (format "tests-~a.rkt" f))]) (syntax/loc stx - (let ([succesful 0]) + (let ([successful 0]) (run-tests* (list (let () (local-require (only-in tests-f run-pkg-tests)) (λ () (printf "starting ~a\n" 'tests-f) (run-pkg-tests) - (set! succesful (add1 succesful)))) + (set! successful (add1 successful)))) ...)) - (unless (= succesful (length '(f ...))) + (unless (= successful (length '(f ...))) (exit 1)))))])) (define (run-tests* l)