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... -- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/91fc1946654f913af6265895... You're receiving this email because of your account on gitlab.common-lisp.net.