Skip to content
Snippets Groups Projects
Commit 775ce5ff authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Fix fasl path for Allegro.

parent f1f3f537
No related branches found
No related tags found
No related merge requests found
......@@ -11,7 +11,10 @@
(defvar *asdf-fasl*
(compile-file-pathname
(let ((impl (string-downcase
(or #+allegro (format nil "~Alisp" excl:*current-case-mode*)
(or #+allegro
(ecase excl:*current-case-mode*
(:case-sensitive-lower :mlisp)
(:case-sensitive-upper :alisp))
#+armedbear :abcl
#+clisp :clisp
#+clozure :ccl
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment