Re: Garnet, CMUCL & Debian

Fred Gilham <[email protected]> writes:

> Chris wrote:
> > I've also installed McCLIM and run the Listener included in the Apps
> > directory - it seems very cool, but it runs very sloooowly on my
> > machine.
> 
> Interesting --- it doesn't run slowly for me but there are many
> variables in our setups that might affect this....

(Using CMUCL 18e on Debian kernel 2.2.25 - need to upgrade that
kernel, I guess.)

Actually, if I use 'run-listener' it works fine, though CPU goes
*waaay* up.  Using 'run-listener-thread' is another story - reducing
the value of lisp:*max-event-to-usec* helped noticeably, but even at
50 (down from 500000!) time between screen paints were 1 - 2 seconds.
I.e., if I type 'Show DIr' into Listener, I have to wait ~1.5 sec. to
make sure of what I typed.

> I attempted to write a listener for Garnet using Gray Streams and the
> multifont widget.  I had delusions of grandeur.  It sort of "worked"
> but not very well.
>
> Anyone interested in looking at what I did can get
> 
>   ftp:/ftp.csl.sri.com/pub/users/gilham/garnet-interactive-streams.tar

No guts, no glory - I applaud your attempt!  As soon as I realized
what a Genera-type Listener did I also realized what a piece of work
it must be.

It would seem that CMUCL's PCL implementation has changed?  I get the
following output:
-----------------------------
; Loading #p"garnet-listener/interactive-stream-classes.lisp".

Error while parsing arguments to DEFMACRO DEFCLASS:
Invalid number of elements in:
  (INTERACTIVE-CHARACTER-OUTPUT-STREAM
   (EXTENSIONS:FUNDAMENTAL-CHARACTER-OUTPUT-STREAM))
to satisfy lambda-list:
  (PCL::NAME PCL::DIRECT-SUPERCLASSES PCL::DIRECT-SLOTS &REST PCL::OPTIONS)
Expected at least 3, but got 2.
-----------------------------

and

-----------------------------
;;; Loading #p"garnet/gadgets/scrolling-window-multifont.x86f".
Object MOUSE-INTER

Error in function PCL::FIND-CLASS-FROM-CELL:
   No class named: GCLOS:INTERACTIVE-STREAM.
-----------------------------

tl.lisp seems to run OK from the REPL, though. :-)

-- 
If we had less statemanship we could get along with fewer battleships.
-- Mark Twain (1835 - 1910)