Raymond Toy pushed to branch issue-333-load-if-does-not-exist at cmucl / cmucl
Commits: 91fc1946 by Raymond Toy at 2024-07-08T08:50:34-07:00 Fix typos in test
"assert-errors" -> "asesrt-error" "assert-faluse" -> "assert-false"
- - - - -
1 changed file:
- tests/issues.lisp
Changes:
===================================== tests/issues.lisp ===================================== @@ -1111,10 +1111,10 @@ ;; "unknown.lisp" should be a file that doesn't exist. Verify that ;; if :IF-DOES-NOT-EXIST is non-NIL we signal an error from LOAD. ;; The first case is the old default value of :ERROR. - (assert-errors 'file-error + (assert-error 'file-error (load "unknown.lisp" :if-does-not-exist :error)) ;; :IF-DOES-NOT-EXIST is a generalized BOOLEAN, so non-NIL will ;; signal an error too. - (assert-errors 'file-error + (assert-error 'file-error (load "unknown.lisp" :if-does-not-exist t)) - (assert-faluse (load "unknown.lisp" :if-does-not-exist nil))) + (assert-false (load "unknown.lisp" :if-does-not-exist nil)))
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/91fc1946654f913af6265895...