Commit 39da4432 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau

Merge branch 'clasp-fixes' into 'master'

Clasp fixes

In particular, this allows tests to be run, even though many still fail.

See merge request !4
parents fc1cb09a fd2c4054
......@@ -9,8 +9,8 @@
#+(or abcl clasp cmucl clozure ecl mkcl sbcl)
(:import-from #+abcl :sys #+(or clasp cmucl ecl) :ext #+clozure :ccl #+mkcl :mk-ext #+sbcl sb-ext
#:*module-provider-functions*
#+(or clasp ecl) #:*load-hooks*)
#+mkcl (:import-from :si #:*load-hooks*))
#+ecl #:*load-hooks*)
#+(or clasp mkcl) (:import-from :si #:*load-hooks*))
(in-package :asdf/footer)
......
......@@ -42,6 +42,10 @@ Some constraints:
(proclaim '(optimize (speed #-gcl 2 #+gcl 1) (safety #-gcl 3 #+gcl 0) #-(or allegro gcl genera) (debug 3)
#+(or cmucl scl) (c::brevity 2) #+(or cmucl scl) (ext:inhibit-warnings 3)))
#+clasp
(unless (assoc "script" core:*load-hooks* :test #'equal)
(push (cons "script" 'core:load-source) core:*load-hooks*))
(defparameter *trace-symbols*
`(;; If you want to trace some stuff while debugging ASDF,
;; here's a nice place to say what.
......@@ -254,8 +258,9 @@ Some constraints:
(:case-sensitive-lower :mlisp)
(:case-insensitive-upper :alisp))
#+armedbear :abcl
#+(or clasp ecl) (or #+ecl-bytecmp :ecl_bytecodes :ecl)
#+ecl (or #+ecl-bytecmp :ecl_bytecodes :ecl)
#+clisp :clisp
#+clasp :clasp
#+clozure :ccl
#+cmucl :cmucl
#+corman :cormanlisp
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment