Raymond Toy pushed to branch issue-360-add-site-init at cmucl / cmucl
Commits:
6120d2c9 by Raymond Toy at 2024-11-29T11:53:16-08:00
Don't load site init when running unit tests
We disabled loading the user's init, but forgot to disable loading of
the site init.
- - - - -
1 changed file:
- bin/run-unit-tests.sh
Changes:
=====================================
bin/run-unit-tests.sh
=====================================
@@ -54,7 +54,7 @@ trap cleanup EXIT
if [ $# -eq 0 ]; then
# No args so run all the tests
- $LISP -noinit -load tests/run-tests.lisp -eval '(cmucl-test-runner:run-all-tests)'
+ $LISP -nositeinit -noinit -load tests/run-tests.lisp -eval '(cmucl-test-runner:run-all-tests)'
else
# Run selected files. Convert each file name to uppercase and append "-TESTS"
result=""
@@ -63,6 +63,6 @@ else
new=`echo $f | tr '[a-z]' '[A-Z]'`
result="$result "\"$new-TESTS\"
done
- $LISP -noinit -load tests/run-tests.lisp -eval "(progn (cmucl-test-runner:load-test-files) (cmucl-test-runner:run-test $result))"
+ $LISP -nositeinit -noinit -load tests/run-tests.lisp -eval "(progn (cmucl-test-runner:load-test-files) (cmucl-test-runner:run-test $result))"
fi
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/6120d2c9e0e57b768a631bf…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/6120d2c9e0e57b768a631bf…
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch issue-360-add-site-init at cmucl / cmucl
Commits:
e28f5fc2 by Raymond Toy at 2024-11-28T09:34:42-08:00
Remove old stuff, update file-comment
- - - - -
1 changed file:
- src/code/default-site-init.lisp
Changes:
=====================================
src/code/default-site-init.lisp
=====================================
@@ -5,7 +5,7 @@
;;; Carnegie Mellon University, and has been placed in the public domain.
;;;
(ext:file-comment
- "$Header: src/code/generic-site.lisp $")
+ "$Header: src/code/default-site-init.lisp $")
;;;
;;; **********************************************************************
;;;
@@ -39,16 +39,6 @@
;;;
;;; If your sources are located somewhere else, change this
;;; accordingly.
-#+nil
-(setf (search-list "target:")
- (list
- (namestring
- (make-pathname
- :directory (pathname-directory
- (merge-pathnames (make-pathname
- :directory '(:relative :up :up
- :up "src"))
- (pathname lisp::*cmucl-core-path*)))))))
(setf (search-list "target:")
'("library:../src/"))
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/e28f5fc2fa5deeb0ee6cdc6…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/e28f5fc2fa5deeb0ee6cdc6…
You're receiving this email because of your account on gitlab.common-lisp.net.