Loading TODO +3 −1 Original line number Diff line number Diff line Loading @@ -189,7 +189,9 @@ *** have a function verify-strict-asd that can verify a asd is pure lp#541562 Then if it passes, use load-strict-asd. If not, optionally issue a warning. Start migrating people toward that. *** Include tests for prebuilt-system in test-bundle and in test-program. ** Include tests for prebuilt-system in test-bundle and in test-program. ** Test that a package-system secondary system is properly superseded when the primary system is redefined. * Learn to use cl-grid-test ** So we can easily make sure ASDF changes don't break stuff, Loading uiop/os.lisp +1 −1 Original line number Diff line number Diff line Loading @@ -68,7 +68,7 @@ except on ABCL where it might change between FASL compilation and runtime." (:genera . os-genera-p) (:os-oldmac . os-oldmac-p)) :when (and (or (not o) (eq feature :os-macosx)) (funcall detect)) :do (setf o feature) (pushnew feature *features*) :else :do (remove feature *features*) :else :do (setf *features* (remove feature *features*)) :finally (return (or o (error "Congratulations for trying ASDF on an operating system~%~ that is neither Unix, nor Windows, nor Genera, nor even old MacOS.~%Now you port it."))))) Loading Loading
TODO +3 −1 Original line number Diff line number Diff line Loading @@ -189,7 +189,9 @@ *** have a function verify-strict-asd that can verify a asd is pure lp#541562 Then if it passes, use load-strict-asd. If not, optionally issue a warning. Start migrating people toward that. *** Include tests for prebuilt-system in test-bundle and in test-program. ** Include tests for prebuilt-system in test-bundle and in test-program. ** Test that a package-system secondary system is properly superseded when the primary system is redefined. * Learn to use cl-grid-test ** So we can easily make sure ASDF changes don't break stuff, Loading
uiop/os.lisp +1 −1 Original line number Diff line number Diff line Loading @@ -68,7 +68,7 @@ except on ABCL where it might change between FASL compilation and runtime." (:genera . os-genera-p) (:os-oldmac . os-oldmac-p)) :when (and (or (not o) (eq feature :os-macosx)) (funcall detect)) :do (setf o feature) (pushnew feature *features*) :else :do (remove feature *features*) :else :do (setf *features* (remove feature *features*)) :finally (return (or o (error "Congratulations for trying ASDF on an operating system~%~ that is neither Unix, nor Windows, nor Genera, nor even old MacOS.~%Now you port it."))))) Loading