Custom Query (1030 matches)

The instructions for rebuilding CCL from sources in this chapter section is missing a step or two that is required when one is installing CCL on certain ARM processors (e.g. ARMv6 used in Raspberry Pi).

cd lisp-kernel/linuxarm make clean make

This is due to differences in the instruction-set on different versions/models of the ARM processor, so some recompilation on the target architecture is necessary.

On a broader note, there are incomplete or obsolete instructions for installing CCL on the Raspberry Pi floating around on various forums/blogs. One high-pagerank example is:

​http://mickcharlesbeaver.blogspot.com/2014/01/clozure-common-lisp-ccl-on-raspberry-pi.html

This refers to the released version 1.9, that does not have a build fix that deals with soft v hard floating-point variants. As of this writing, you need to download and build trunk. Otherwise you have to fix/hardwire the build script as RME mentioned in the internal Clozure IRC a few days ago, to deal with floating point issues.

The blog entry mentions the make clean && make issue raised in this bug report, but it does not mention that you have to recompile from sources to get a fully functional CCL image.

Welcome to Clozure Common Lisp Version 1.9-r15758 (DarwinX8632)!

? (defstruct (foo (:constructor make-foo (mask)))

(mask 0 :type (unsigned-byte 64)))

(make-foo 4177526783)

Error: The value 4177526783 is not of the expected type (UNSIGNED-BYTE 64). While executing: MAKE-FOO, in process listener(1). Type :POP to abort, :R for a list of available restarts. Type :? for other options.

The following code was taken from Sonja E. Keene's book Object-Oriented Programming in Common Lisp pages 20-22.

(defclass lock ()
  ((name :initarg :name :reader lock-name))
  (:documentation "The foundation of all locks."))

(defclass null-lock (lock)
  ()
  (:documentation "A lock that is always free."))

(defclass simple-lock (lock)
  ((owner :initform nil :accessor lock-owner))
  (:documentation "A lock that is either free or busy."))

The debugger outputs the following:

Class option :DOCUMENTATION is not one of (:NAME)
   [Condition of type CCL::SIMPLE-PROGRAM-ERROR]
Backtrace:
  0: ((:INTERNAL CCL::FCOMP-MACROEXPAND-1) #<CCL::SIMPLE-PROGRAM-ERROR #x302001A53CCD>)
  1: (SIGNAL #<CCL::SIMPLE-PROGRAM-ERROR #x302001A53CCD>)
  2: (CCL::%ERROR #<CCL::SIMPLE-PROGRAM-ERROR #x302001A53CCD> NIL 17578517607375)
  3: (DEFCLASS (DEFCLASS LOCK () ((NAME :INITARG :NAME :READER LOCK-NAME)) (:DOCUMENTATION "The foundation of all locks.")) #<CCL::LEXICAL-ENVIRONMENT #x302001A5C6CD>)
  4: (FUNCALL #<Compiled-function DEFCLASS Macroexpander #x3000008F698F> (DEFCLASS LOCK () ((NAME :INITARG :NAME :READER LOCK-NAME)) (:DOCUMENTATION "The foundation of all locks.")) #<CCL::LEXICAL-ENVIRONM..
  5: (MACROEXPAND-1 (DEFCLASS LOCK () ((NAME :INITARG :NAME :READER LOCK-NAME)) (:DOCUMENTATION "The foundation of all locks.")) #<CCL::LEXICAL-ENVIRONMENT #x302001A5C6CD>)
  6: (CCL::FCOMP-MACROEXPAND-1 (DEFCLASS LOCK () ((NAME :INITARG :NAME :READER LOCK-NAME)) (:DOCUMENTATION "The foundation of all locks.")) #<CCL::LEXICAL-ENVIRONMENT #x302001A5C6CD>)
  7: (CCL::FCOMP-FORM-1 (DEFCLASS LOCK () ((NAME :INITARG :NAME :READER LOCK-NAME)) (:DOCUMENTATION "The foundation of all locks.")) #<CCL::LEXICAL-ENVIRONMENT #x302001A5C6CD> :NOT-COMPILE-TIME)
  8: (CCL::FCOMP-FORM (DEFCLASS LOCK () ((NAME :INITARG :NAME :READER LOCK-NAME)) (:DOCUMENTATION "The foundation of all locks.")) #<CCL::LEXICAL-ENVIRONMENT #x302001A5C6CD> :NOT-COMPILE-TIME)
  9: (CCL::FCOMP-READ-LOOP "/home/sian/lisp/locks.lisp" "home:lisp;locks.lisp.newest" 0 #<CCL::LEXICAL-ENVIRONMENT #x302001A5C6CD> :NOT-COMPILE-TIME)
 10: (CCL::FCOMP-FILE "/home/sian/lisp/locks.lisp" "home:lisp;locks.lisp.newest" 0 #<CCL::LEXICAL-ENVIRONMENT #x302001A5C6CD>)
 11: (CCL::%COMPILE-FILE "/home/sian/lisp/locks.lisp" "/home/sian/lisp/locks.lx64fsl" T NIL T T NIL T :DEFER NIL #<BACKEND LINUXX8664 #x3020001CDE3D> :DEFAULT NIL 0)
 12: (COMPILE-FILE #P"/home/sian/lisp/locks.lisp" :OUTPUT-FILE #P"/home/sian/lisp/locks.lx64fsl" :VERBOSE T :PRINT NIL :LOAD NIL :FEATURES NIL :TARGET :LINUXX8664 :SAVE-LOCAL-SYMBOLS T :SAVE-DOC-STRINGS T ..