diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2021-07-13 07:33:06 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2021-07-13 07:33:06 -0700 |
commit | 2a69cc88e868653e89cf0c9de6c4e48cb790511a (patch) | |
tree | c26e6752b255dc0157f6b74d7c308054bce4cb40 /tests/017 | |
parent | e3b13d2f147596c483797cf4dd54420cf7aa34e4 (diff) | |
download | txr-2a69cc88e868653e89cf0c9de6c4e48cb790511a.tar.gz txr-2a69cc88e868653e89cf0c9de6c4e48cb790511a.tar.bz2 txr-2a69cc88e868653e89cf0c9de6c4e48cb790511a.zip |
tests: guix fixes.
* tests/002/query-1.txr: Skip test if an executable
/bin/sh doesn't exist, rather than the bogus reasons.
* tests/010/json.tl: Change the condition for the
command-put-json tests: not whether cat is found
in the search path but whether /bin/sh exists and is executable.
* tests/017/realpath.tl: Also quit if /usr/bin doesn't exist.
* tests/018/path-test.tl: Exit succesfully if /bin/sh
does not exist. Revert the earlier change.
* tests/018/process.tl: Quit if no executable /bin/sh exists.
Diffstat (limited to 'tests/017')
-rw-r--r-- | tests/017/realpath.tl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/017/realpath.tl b/tests/017/realpath.tl index 5471a1c8..68ee7a7f 100644 --- a/tests/017/realpath.tl +++ b/tests/017/realpath.tl @@ -1,6 +1,7 @@ (load "../common") -(when (memq (os-symbol) '(:cygwin :solaris :android)) +(when (or (memq (os-symbol) '(:cygwin :solaris :android)) + (not (path-exists-p "/usr/bin"))) (put-string (file-get-string "tests/017/realpath.expected")) (exit 0)) |