Fix lose() invocation inside sparc-arch.c

[sbcl.git] / tests / script.test.sh

diff --git a/tests/script.test.sh b/tests/script.test.sh
index 48da103..b209d96 100644 (file)
--- a/tests/script.test.sh
+++ b/tests/script.test.sh
@@ -29,9 +29,9 @@ check_status_maybe_lose "--script exit status from EXIT" $? 7 "(status good)"
 echo '(error "oops")' > $tmpscript
 run_sbcl --script $tmpscript 1> $tmpout 2> $tmperr
 check_status_maybe_lose "--script exit status from ERROR" $? 1 "(error implies 1)"
-grep BACKTRACE $tmpout > /dev/null
+grep Backtrace $tmpout > /dev/null
 check_status_maybe_lose "--script backtrace not to stdout" $? 1 "(ok)"
-grep BACKTRACE $tmperr > /dev/null
+grep Backtrace $tmperr > /dev/null
 check_status_maybe_lose "--script backtrace to stderr" $? 0 "(ok)"
 
 echo 'nil'> $tmpscript
@@ -114,7 +114,7 @@ fi
 echo '(format t "Hello, Fasl~%")' > $tmpscript
 run_sbcl --eval "(compile-file \"$tmpscript\" :output-file \"$tmpfasl\")"  </dev/null >/dev/null
 chmod +x $tmpfasl
-SBCL_HOME=$(dirname $SBCL_CORE) ./$tmpfasl >$tmpout 2>$tmperr
+SBCL_HOME=`dirname $SBCL_CORE` ./$tmpfasl >$tmpout 2>$tmperr
 check_status_maybe_lose "--script exit status from fasl" $? 0 "(ok)"
 if [ -s $tmperr ] || [ "Hello, Fasl" != "`cat $tmpout`" ]
 then