Custom Query (1030 matches)

if you start the IDE by doubleclicking on a .lisp file the IDE starts showing tha file. There is no Listener window at this point. if you evaluate something the Listener window appear invoking (not until now) immediately the ccl-init.lisp file...

normal behavior should be that the IDE execute a full start with cc-init and a listener window.

(from ​http://clozure.com/pipermail/openmcl-devel/2009-May/009380.html)

In cmd.exe, I cd to c:\cclㅁ; (c:\cclM where M is the square Korean character #\u+3141; any Korean characters in the path have this effect) and run C:\cclㅁ>wx86cl.exe > log.txt

> Error: value NIL is not of the expected type (OR STRING PATHNAME STREAM).
> While executing: PATHNAME-DIRECTORY, in process Initial(0).
> Type :GO to continue, :POP to abort, :R for a list of available restarts.
> If continued: Skip (possibly crucial) startup function
CCL::INIT-LOGICAL-DIRECTORIES.
> Type :? for other options.
> Error: value NIL is not of the expected type CCL::RECURSIVE-LOCK.
> While executing: CCL::RECURSIVE-LOCK-PTR, in process Initial(0).
> Type :POP to abort, :R for a list of available restarts.

We see a similar problem on Darwin:

$ cd ccl-1.3-日本語/
$ ./dx86cl
> Error: value NIL is not of the expected type (OR STRING PATHNAME STREAM).
> While executing: PATHNAME-DIRECTORY, in process Initial(0).
> Type :GO to continue, :POP to abort, :R for a list of available restarts.
> If continued: Skip (possibly crucial) startup function CCL::INIT-LOGICAL-DIRECTORIES.
> Type :? for other options.
1 > 

Redefining a class does not work properly when the first def contains :default-initargs, but the second def does not. What happens is that use of the second def still has the default initiarg.

? (defclass foo () ((x :accessor x :initarg :x)) (:default-initargs :x 2))

? (describe (make-instance 'foo))

#<FOO #x302093A3C44D>
Class: #<STANDARD-CLASS FOO>
Wrapper: #<CCL::CLASS-WRAPPER FOO #x302093A3E25D>
Instance slots
X: 2

? (defclass foo () ((x :accessor x :initarg :x)))

? (describe (make-instance 'foo))

#<FOO #x302093A3C44D>
Class: #<STANDARD-CLASS FOO>
Wrapper: #<CCL::CLASS-WRAPPER FOO #x302093A3E25D>
Instance slots
X: 2