From d4123698b4abe158aadc16318f5c75c54bc8e7f3 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Tue, 25 Jun 2019 11:15:30 -0600 Subject: [PATCH] fix case-sensitivity in a test --- pkgs/compiler-test/tests/compiler/embed/test.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pkgs/compiler-test/tests/compiler/embed/test.rkt b/pkgs/compiler-test/tests/compiler/embed/test.rkt index 9ec5a39e6e..980b1e4b74 100644 --- a/pkgs/compiler-test/tests/compiler/embed/test.rkt +++ b/pkgs/compiler-test/tests/compiler/embed/test.rkt @@ -328,7 +328,7 @@ compiler/find-exe) (define (add-suffixes s) (define me (path-replace-suffix (find-exe) #"")) - (define ending (regexp-match #rx#"(?i:racket)([cs3mg]*)$" me)) + (define ending (regexp-match #rx#"(?i:racket([cs3mg]*))$" me)) (define s2 (string-append s (bytes->string/utf-8 (cadr ending)))) (if (eq? 'windows (system-type)) (string-append s2 ".exe")