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

raco exe: suppress expected stderr output

Browse Source 
Merge to v6.0

original commit: fd2da02029
This commit is contained in:
Matthew Flatt 2013-11-30 08:07:32 -07:00
parent 88c3578e52
commit 9101bccd5b
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
pkgs/compiler-pkgs/compiler-test/tests/compiler/embed/test.rkt
View File

@ -1,8 +1,9 @@
#lang racket/base
(require compiler/embed
mzlib/file
mzlib/process
racket/file
racket/system
racket/port
launcher
compiler/distribute)
@ -418,7 +419,8 @@
(path->string (build-path (collection-path "tests" "compiler" "embed") prog)))
(try-exe (mk-dest mred?) "This is 6\n#t\n" mred? void "cts") ; <- cts copied to distribution
(delete-directory/files "cts")
(test #f system* (mk-dest mred?)))
(parameterize ([current-error-port (open-output-nowhere)])
(test #f system* (mk-dest mred?))))
(check-collection-path "embed-me6b.rkt" "racket/fixnum.rkt" #t)
(check-collection-path "embed-me6.rkt" "mzlib/etc.rkt" #f)