Custom Query (1030 matches)

Clozure C64.app from the ​ftp://clozure.com/pub/release/1.5/ccl-1.5-darwinx86.dmg distribution does not start properly: I get the following message in an AltConsole window:

> Error: Objective-C runtime exception: 
>        *** -[NSKeyedUnarchiver initForReadingWithData:]: non-keyed archive cannot be decoded by NSKeyedUnarchiver
> While executing: (:INTERNAL GUI::|+[LispApplicationDelegate initialize]|), in process Initial(0).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.
1 > 

The same problem happens when I run dx86cl64 in a terminal and try to build the IDE by hand (require :cocoa-application) - I eventually get:

;Compiling "/Users/jacek/lisp/ccl-1.5/cocoa-ide/xinspector.lisp"...
> Error: Objective-C runtime exception: 
>        *** -[NSKeyedUnarchiver initForReadingWithData:]: non-keyed archive cannot be decoded by NSKeyedUnarchiver
> While executing: #<Anonymous Function #x30200069218F>, in process Initial(0).


;;;
;;; #<PROCESS Initial(0) [Active] #x3020000B752D> requires access to Shared Terminal Input
;;; Type (:y 0) to yield control to this thread.
;;;
;Loading #P"/Users/jacek/lisp/ccl-1.5/cocoa-ide/fasls/xinspector.dx64fsl"...

Version: Clozure CL64-36452 MacBookPro 6,2 with IntelCore i7.

My old version of CCL (early 1.4) works fine.

The following shows a problem that I noticed.

The condition signalled seems ok (SIMPLE-READER-ERROR) but the associated message does not mention the fact that the problem is the unknown package.

Incidentally I would create a special PACKAGE-NOT-FOUND-READER condition for this specific error.

paniscia:~ marcoxa$ ccl
AM I BEING LOADED?
Welcome to Clozure Common Lisp Version 1.5-r13651  (DarwinX8632)!
? (ignore-errors (read))
foo::bar

NIL
#<CCL::SIMPLE-READER-ERROR #xC47489E>
? > Error: Unbound variable: BAR
> While executing: CCL::TOPLEVEL-EVAL, in process listener(1).
> Type :GO to continue, :POP to abort, :R for a list of available restarts.
> If continued: Retry getting the value of BAR.
> Type :? for other options.
1 > :pop

Marco

Consider the following example:

(defmacro mdiv0 () (/ 1 0)) (ignore-errors (mdiv0))

After executing the above line CCL invoke debugger with "DIVISION-BY-ZERO detected

[Condition of type DIVISION-BY-ZERO]"

If I replace defmacro with defun the result is as expected - two values - nil and divizion-by-zero condition are returned.