Package: cl-ironclad
Version: 0.9.0.dfsg-1
Severity: serious
I use '(clc:clc-require :ironclad)' to compile it, all of them get just errors
in cmucl, sbcl and clisp:
[cmucl]
Type-error in KERNEL::OBJECT-NOT-TYPE-ERROR-HANDLER: NIL is not of type REAL
[Condition of type TYPE-ERROR]
Restarts:
0: [ABORT] Return to Top-Level.
Debug (type H for help)
(MAX 1 NIL)[:EXTERNAL]
Source:
; File: target:code/numbers.lisp
(DEFUN MAX (NUMBER &REST MORE-NUMBERS)
"Returns the greatest of its arguments."
(DECLARE (OPTIMIZE #) (REAL NUMBER) (DYNAMIC-EXTENT MORE-NUMBERS))
...)
0]
[sbcl]
debugger invoked on a TYPE-ERROR in thread #<THREAD "initial thread" {90032C1}>:
The value NIL is not of type REAL.
Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL.
restarts (invokable by number or by possibly-abbreviated name):
0: [ABORT] Exit debugger, returning to top level.
(MAX NIL)
0]
;; Compiling file /usr/share/common-lisp/source/ironclad/sha256.lisp ...
*** - SYSTEM::%RPLACD: NIL is not a pair
The following restarts are available:
USE-VALUE :R1 You may input a value to be used instead.
RETRY :R2
Retry performing #<ASDF:COMPILE-OP NIL #x2044C05E> on
#<IRONCLAD-SYSTEM::IRONCLAD-SOURCE-FILE
"sha256" #x20445896>.
ACCEPT :R3
Continue, treating #<ASDF:COMPILE-OP NIL #x2044C05E> on
#<IRONCLAD-SYSTEM::IRONCLAD-SOURCE-FILE
"sha256" #x20445896> as having been successful.
ABORT :R4 ABORT
Break 1 CRYPTO[2]>
In both cmucl and sbcl, It seems that something about the function 'max', but I
just find two line in 'ironclad.asd' which use the function 'max':
(defmethod perform :around ((op compile-op) (c ironclad-source-file))
(let ((*readtable* *ironclad-readtable*)
(*print-base* 10) ; INTERN'ing FORMAT'd symbols
#+sbcl (sb-ext:*inline-expansion-limit* (max
sb-ext:*inline-expansion-limit* 1000))
~~~ here
#+sbcl (*features* (cons sb-c:*backend-byte-order* *features*))
#+cmu (ext:*inline-expansion-limit* (max ext:*inline-expansion-limit*
1000))
~~~ and here
#+cmu (*features* (cons (c:backend-byte-order c:*target-backend*)
*features*)))
(call-next-method)))
And clisp seems so buggy, most of cl-* packages in Debian cannot load
correctly...
I can't point out what's the problem, but this package is so useful, I hope you
can fix it... Thank you very much.
--
(setq reply-to
(concatenate 'string "Binghe " "<tianchunbinghe" '(#\@) "gmail.com>"))
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
