Slate on Corman Lisp

[Chris Double]

For anyone trying to get Slate working on Corman Lisp, I got things
going on CCL 2.0 with the following changes:

1) Added BOOLEAN type specifier to CCL:

------------8<--------------------
(in-package :cl)

(declare-type-specifier boolean (x specifier)
	(declare (ignore specifier))
    t)

(in-package :cl-user)
------------8<--------------------

2) Change #\Null to #\Nul

3) CCL bug workaround

CCL has a bug when (intern ...) is called with an array rather than a
string. This occurs in READ-SYMBOL in slate. I created a helper
function 'to-string' to convert the array to a string:

(defun to-string (array)
    (let ((string (make-string (length array))))
        (dotimes (n (length array) string)
            (setf (char string n) (elt array n)))))

Then changed the '(intern buffer)' in READ-SYMBOL to be (intern
(to-string buffer)).

With those changes Slate works.

Cheers,
Chris.
-- 
http://www.double.co.nz