$ ccl --no-init --eval '(load "~/quicklisp/setup.lisp")' --eval '(ql:quickload "cl-htmlprag")'
To load "cl-htmlprag":
Load 1 ASDF system:
cl-htmlprag
; Loading "cl-htmlprag"
[package schemish].
> Error: Can not redefine a special-form: LET .
> While executing: (SETF MACRO-FUNCTION), in process listener(1).
> Type :GO to continue, :POP to abort, :R for a list of available restarts.
> If continued: Skip evaluation of (ql:quickload "cl-htmlprag")
> Type :? for other options.
1 >
Here's the fix:
diff --git a/schemish.lisp b/schemish.lisp
index 9da2ac0..44dc97a 100644
--- a/schemish.lisp
+++ b/schemish.lisp
@@ -7,6 +7,7 @@
(cl:defpackage :schemish
(:documentation "A Scheme-like environment for porting HTMLPrag to Common Lisp. It implements only those features of
Scheme that were actually used by HTMLPrag.")
+ (:use)
(:export :let :LAMBDA :Λ :IF :COND :EQ? :PAIR? :CAR :CDR :DEFINE :APPLY :MAP :LENGTH
:STRING-LENGTH :REVERSE :LIST->STRING :STRING->LIST :NOT :AND :OR :EQUAL?
:NULL? :LIST? :EOF-OBJECT? :CLOSE-OUTPUT-PORT :CLOSE-INPUT-PORT
Here's a portability bug:
Here's the fix: