1.1--- a/x.lisp Tue Jun 18 14:25:50 2024 -0400
1.2+++ b/x.lisp Tue Jun 18 21:29:07 2024 -0400
1.3@@ -21,12 +21,7 @@
1.4 (require 'sb-cover)
1.5 ;; (require 'sb-sprof)
1.6
1.7-(unless (asdf:find-system :cl-ppcre nil)
1.8- (ql:quickload :cl-ppcre)
1.9- (ql:quickload :cffi)
1.10- ;; (asdf:load-asd (probe-file #P"ext/cl-ppcre.asd"))
1.11- )
1.12-
1.13+(asdf:load-system (asdf:find-system :cl-ppcre))
1.14 (asdf:load-asd (probe-file (merge-pathnames "std.asd" "lisp/std/")))
1.15 (asdf:load-system :std)
1.16