suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix a test for racketbc

Browse Source
This commit is contained in:
Matthew Flatt 2020-08-02 16:18:02 -06:00
parent b32b3178bc
commit 0866ddea01
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkgs/racket-test/tests/racket/old-make-zo.rkt
View File

@ -15,7 +15,7 @@
(define (exe s) (define (exe s)
(define me (path-replace-suffix (find-exe) #"")) (define me (path-replace-suffix (find-exe) #""))
(define ending (bytes->string/utf-8 (cadr (regexp-match #rx#"(?i:racket)([cs3mg]*)$" me)))) (define ending (bytes->string/utf-8 (cadr (regexp-match #rx#"(?i:racket)([cs3mgbc]*)$" me))))
(string-append s ending (if (eq? (system-type) 'windows) ".exe" ""))) (string-append s ending (if (eq? (system-type) 'windows) ".exe" "")))
(define (check auto-dir? v) (define (check auto-dir? v)