Quicklisp libraries in Clasp

In the following section one can find the a script to compile the most popular quicklisp libraries and run there tests: Initially based on http://blog.quicklisp.org/2018/03/download-stats-for-february-2018.html.

• Start with setting $lisp to the right instance of clasp, e.g. export lisp="/Users/karstenpoeck/lisp/compiler/clasp-koga/build/boehmprecise/clasp"
• save the script e.g. as test-quicklisp.sh

#! /bin/bash
#export lisp="/Users/karstenpoeck/lisp/compiler/clasp-koga/build/boehmprecise/clasp"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :alexandria  :verbose nil)" --eval "(asdf:test-system (asdf:find-system :alexandria))"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :closer-mop :verbose nil)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :babel-tests :verbose nil)" --eval "(babel-tests:run)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-ppcre/test :verbose nil)" --eval "(cl-ppcre-test::run-all-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :split-sequence/tests :verbose nil)" --eval "(split-sequence/tests::run! :split-sequence)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :trivial-features-tests :verbose nil)" --eval "(trivial-features-tests::do-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :iterate/tests :verbose nil)" --eval "(iterate.test::do-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :trivial-gray-streams-test :verbose nil)" --eval "(trivial-gray-streams-test::run-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :bordeaux-threads/test :verbose nil)" --eval "(bordeaux-threads/test::run! :bordeaux-threads)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :anaphora/test :verbose nil)" --eval "(rt:do-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :let-plus/tests :verbose nil)" --eval "(let-plus-tests::run)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#test fails when run twice
# time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cffi-tests :verbose nil)" --eval "(cffi-tests::run-all-cffi-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cffi-tests :verbose nil)" --eval "(cffi-tests::run-cffi-tests :compiled nil)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :trivial-garbage/tests :verbose nil)" --eval "(rtest::do-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :flexi-streams-test :verbose nil)" --eval "(flexi-streams-test::run-all-tests)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :nibbles/tests :verbose nil)" --eval "(rtest:do-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload \"puri/test\" :verbose nil)" --eval "(funcall (intern (symbol-name '#:do-tests)(find-package '#:puri/test)))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :usocket-test :verbose nil)" --eval "(usocket-test:do-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :trivial-backtrace-test :verbose nil)" --eval "(lift:run-tests :suite 'trivial-backtrace-test::trivial-backtrace-test)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :more-conditions/test :verbose nil)" --eval "(more-conditions.test:run-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :chunga :verbose nil)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-fad/test :verbose nil)" --eval "(cl-fad-test::test)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#test fails
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl+ssl.test :verbose nil)" --eval "(IT.BESE.FIVEAM:RUN-ALL-TESTS)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-base64/test :verbose nil)" --eval "(cl-base64/test::do-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :esrap/tests :verbose nil)" --eval "(esrap-tests::run-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :chipz :verbose nil)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :named-readtables/test :verbose nil)"  --eval "(named-readtables-test::do-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :drakma-test :verbose nil)"  --eval "(fiveam::run! :drakma)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"

#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :local-time/test :verbose nil)"  --eval "(local-time.test::test)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :parse-number/tests  :verbose nil)"  --eval "(org.mapcar.parse-number-tests::run-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :fiveam/test  :verbose nil)"  --eval  "(5am:run! :it.bese.fiveam)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :closure-common  :verbose nil)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cxml  :verbose nil)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :log4cl/test :verbose nil)"  --eval "(stefil:funcall-test-with-feedback-message 'log4cl-test::test)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :optima.test :verbose nil)"  --eval "(eos:run! 'optima.test::optima-test)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :parser.common-rules/test :verbose nil)"  --eval "(parser.common-rules.test::run-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-unicode/test :verbose nil)"  --eval " (cl-unicode-test::run-all-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"

time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-interpol-test :verbose nil)"  --eval "(funcall (intern (symbol-name :run-all-tests) (find-package :cl-interpol-test)))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#test fails
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :lparallel-test :verbose nil)"  --eval " (lparallel-test:execute)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :lparallel-test :verbose nil)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-dot :verbose nil)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-syntax :verbose nil)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-annot :verbose nil)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#xpath test stops
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cxml-stp/test :verbose nil)" --eval "(progn (cxml-stp-test::do-tests)(cxml-stp-test::run-xpath-tests))"--eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cxml-stp/test :verbose nil)" --eval "(cxml-stp-test::do-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-store-tests :verbose nil)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :fare-utils-test :verbose nil)" --eval "(fare-utils-test::test-suite)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#fare-quasiquote-test does not load anymore
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :fare-quasiquote-test :verbose nil)" --eval "(fare-quasiquote/test::fare-quasiquote-test)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :fare-quasiquote :verbose nil)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
# not eith bir dies compiling plexippus-xpath-20190521-git/parser.lisp in the yacc definition
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :xml.location/test :verbose nil)" --eval "(let ((lift:*current-asdf-system-name* (asdf:find-system :xml.location/test))) (lift::RUN-TESTS :config :generic))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-utilities :verbose nil)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :clx :verbose nil)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :ironclad/tests)" --eval "(rtest::do-tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-pdf)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :clim-examples :verbose nil)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"

### from https://www.quicklisp.org/stats/2020/2020-12.csv
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :trivial-indent)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :documentation-utils)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :trivial-types)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :yacc)" --eval "(load (make-pathname :name \"yacc-tests\" :type \"lisp\" :defaults (asdf:component-pathname (asdf:find-system :yacc))))" --eval "(yacc-tests:tests)" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :array-utils)" --eval "(asdf:test-system (asdf:find-system :array-utils))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :plump)" --eval "(asdf:test-system (asdf:find-system :plump))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :quri)" --eval "(asdf:test-system (asdf:find-system :quri))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
# because of CL-LOCALE.CORE::@EXPORT.
# errors time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :djula)" --eval "(asdf:test-system (asdf:find-system :djula))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :collectors)" --eval "(asdf:test-system (asdf:find-system :collectors))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
# walker does not work time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :arnesi)" --eval "(asdf:test-system (asdf:find-system :arnesi))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :arnesi)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :symbol-munger)" --eval "(asdf:test-system (asdf:find-system :symbol-munger))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :trivial-utf-8)" --eval "(asdf:test-system (asdf:find-system :trivial-utf-8))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :access)" --eval "(asdf:test-system (asdf:find-system :access))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-slice)" --eval "(asdf:test-system (asdf:find-system :cl-slice))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :parser-combinators)" --eval "(asdf:test-system (asdf:find-system :parser-combinators))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :gettext)" --eval "(asdf:test-system (asdf:find-system :gettext))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#crashes time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-locale)" --eval "(asdf:test-system (asdf:find-system :cl-locale))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-json)" --eval "(asdf:test-system (asdf:find-system :cl-json))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :md5)" --eval "(asdf:test-system (asdf:find-system :md5))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :simple-date-time)" --eval "(asdf:test-system (asdf:find-system :simple-date-time))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :static-vectors)" --eval "(asdf:test-system (asdf:find-system :static-vectors))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :ql-checkout)" --eval "(asdf:test-system (asdf:find-system :ql-checkout))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :ieee-floats)" --eval "(asdf:test-system (asdf:find-system :ieee-floats))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :net.didierverna.asdf-flv)" --eval "(asdf:test-system (asdf:find-system :net.didierverna.asdf-flv))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :fast-io)" --eval "(asdf:test-system (asdf:find-system :fast-io))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :uuid)" --eval "(asdf:test-system (asdf:find-system :uuid))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :salza2)" --eval "(handler-case (asdf:test-system (asdf:find-system :salza2))(error (e) e))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :introspect-environment)" --eval "(asdf:test-system (asdf:find-system :introspect-environment))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :yason)" --eval "(asdf:test-system (asdf:find-system :yason))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :hunchentoot)" --eval "(asdf:test-system (asdf:find-system :hunchentoot))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :rfc2388)" --eval "(asdf:test-system (asdf:find-system :rfc2388))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :global-vars)" --eval "(asdf:test-system (asdf:find-system :global-vars))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#quickclasp?
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :trivia)" --eval "(asdf:test-system (asdf:find-system :trivia))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :lisp-namespace)" --eval "(asdf:test-system (asdf:find-system :lisp-namespace))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :trivial-cltl2)" --eval "(asdf:test-system (asdf:find-system :trivial-cltl2))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#some errors
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :proc-parse)" --eval "(asdf:test-system (asdf:find-system :proc-parse))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :trivial-mimes)" --eval "(asdf:test-system (asdf:find-system :trivial-mimes))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#test does not terminate time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :type-i)" --eval "(asdf:test-system (asdf:find-system :type-i))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-ansi-text)" --eval "(asdf:test-system (asdf:find-system :cl-ansi-text))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :xsubseq)" --eval "(asdf:test-system (asdf:find-system :xsubseq))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :smart-buffer)" --eval "(asdf:test-system (asdf:find-system :smart-buffer))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :more-conditions)" --eval "(asdf:test-system (asdf:find-system :more-conditions))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :nibbles)" --eval "(asdf:test-system (asdf:find-system :nibbles))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#some compiler errors
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :fast-http)" --eval "(asdf:test-system (asdf:find-system :fast-http))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#some compiler errors
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :dexador)" --eval "(asdf:test-system (asdf:find-system :dexador))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-reexport)" --eval "(asdf:test-system (asdf:find-system :cl-reexport))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :jsown)" --eval "(asdf:test-system (asdf:find-system :jsown))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#some compiler errors
#time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-cookie)" --eval "(asdf:test-system (asdf:find-system :cl-cookie))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :prove)" --eval "(asdf:test-system (asdf:find-system :prove))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#need a test database to test #time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :postmodern)" --eval "(asdf:test-system (asdf:find-system :postmodern))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#needs ironclad time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :postmodern)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :parse-float)" --eval "(asdf:test-system (asdf:find-system :parse-float))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :metabang-bind)" --eval "(asdf:test-system (asdf:find-system :metabang-bind))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-colors)" --eval "(asdf:test-system (asdf:find-system :cl-colors))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#buggy, does not even work in sbcl time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :command-line-arguments)" --eval "(asdf:test-system (asdf:find-system :command-line-arguments))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :swap-bytes)" --eval "(asdf:test-system (asdf:find-system :swap-bytes))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-colors2)" --eval "(asdf:test-system (asdf:find-system :cl-colors2))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#test not found time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :uax-15)" --eval "(asdf:test-system (asdf:find-system :uax-15))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :uax-15)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :cl-containers)"  --eval "(asdf:test-system (asdf:find-system :cl-containers))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :atomics)"  --eval "(asdf:test-system (asdf:find-system :atomics))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :asdf-system-connections)"  --eval "(asdf:test-system (asdf:find-system :asdf-system-connections))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "(ql:quickload :metatilities-base)"  --eval "(asdf:test-system (asdf:find-system :metatilities-base))" --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"
#tries to redefine eclector
time $lisp --eval "(require :asdf)" --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" --eval "#+clasp (asdf:register-immutable-system :eclector) #-clasp nil" --eval "#+clasp (asdf:register-immutable-system :eclector-concrete-syntax-tree) #-clasp nil" --eval "(ql:quickload :staple)"  --eval "#+clasp (ext:quit) #+sbcl (SB-EXT:QUIT)"