projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
0.6.11.36:
[sbcl.git]
/
tests
/
side-effectful-pathnames.test.sh
diff --git
a/tests/side-effectful-pathnames.test.sh
b/tests/side-effectful-pathnames.test.sh
index
1b57d8e
..
c104f52
100644
(file)
--- a/
tests/side-effectful-pathnames.test.sh
+++ b/
tests/side-effectful-pathnames.test.sh
@@
-10,7
+10,7
@@
cat >$testfilename <<EOF
(in-package :cl-user)
(defparameter *loaded* :yes)
EOF
(in-package :cl-user)
(defparameter *loaded* :yes)
EOF
-sbcl --noinform --noprint --sysinit /dev/null --userinit /dev/null <<EOF
+${SBCL:-sbcl} <<EOF
(in-package :cl-user)
(setf (logical-pathname-translations "TEST")
(list (list "**;*.*.*" "$testdir/**/*.*")))
(in-package :cl-user)
(setf (logical-pathname-translations "TEST")
(list (list "**;*.*.*" "$testdir/**/*.*")))
@@
-31,7
+31,7
@@
sbcl --noinform --noprint --sysinit /dev/null --userinit /dev/null <<EOF
(assert (string= compiled-file-name expected-file-name)))
(sb-ext:quit :unix-status 52)
EOF
(assert (string= compiled-file-name expected-file-name)))
(sb-ext:quit :unix-status 52)
EOF
-if [ $? ~= 52 ]; then
+if [ $? != 52 ]; then
echo test failed: $?
exit 1
fi
echo test failed: $?
exit 1
fi