Make test cross-platform

This commit is contained in:
Michael Camilleri 2023-06-24 10:56:47 +09:00
parent f977ace7f8
commit 1ccd879916
No known key found for this signature in database
GPG Key ID: 7EB218A48DF8B572
1 changed files with 5 additions and 1 deletions

View File

@ -138,7 +138,11 @@
"/dev/null"))
(os/open path :w))
(with [dn (devnull)]
(os/execute ["ls"] :px {:out dn :err dn})))
(os/execute [(dyn :executable)
"-e"
"(print :foo) (eprint :bar)"]
:px
{:out dn :err dn})))
(end-suite)