1.0.45.35: revert 1.0.45.30 due to regression (lp#677779)

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

diff --git a/tests/script.test.sh b/tests/script.test.sh
index 87061f6..a9ce19a 100644 (file)
--- a/tests/script.test.sh
+++ b/tests/script.test.sh
@@ -31,12 +31,6 @@ echo 'nil'> $tmpscript
 run_sbcl --script $tmpscript
 check_status_maybe_lose "--script exit status from normal exit" $? 0 "(everything ok)"
 
-echo '(setf *error-output* *standard-output*) (defun foo () (bar)) (defun bar () 11) (quit :unix-status (foo))'> $tmpscript
-out=`run_sbcl --script $tmpscript`
-check_status_maybe_lose "--script exit status from normal exit" $? 11 "(everything ok)"
-test -z "$out"
-check_status_maybe_lose "--script forward-referenced functions" $? 0 "(everything ok)"
-
 rm -f $tmpscript
 
 exit $EXIT_TEST_WIN