[mcclim-devel] pb mcclim cmucl clx

[Irene DURAND]

Hello,

I have succeeded in compiling mcclim with CMUCL :
----------------------------------------
CMU Common Lisp CVS release-19a 19a-release-20040728 + minimal debian 
patches, running on vivaldi.emi.u-bordeaux1.fr
With core: /usr/lib/cmucl/lisp.core
Dumped on: Mon, 2005-11-28 13:34:06+01:00 on vivaldi.emi.u-bordeaux1.fr
For support see http://www.cons.org/cmucl/support.html Send bug reports 
to the debian BTS.
or to pvaneynd at debian.org
type (help) for help, (quit) to exit, and (demo) to see the demos

Loaded subsystems:
    Python 1.1, target Intel x86
    CLOS based on Gerd's PCL 2004/04/14 03:32:47
----------------------------------------
 The compilation ended normally with :     

; Compilation unit finished.
;   27 warnings
;   589 notes
----------------------------------------
Now when I start a clim application I get a clx error:

CL-USER> (clim-demo::clim-fig)

:INTERNET fell through ECASE expression.  Wanted one of (:UNIX OR :TCP NIL).
  [Condition of type CONDITIONS::CASE-FAILURE]

Restarts:
 0: [ABORT] Abort handling SLIME request.
 1: [ABORT] Return to Top-Level.

Backtrace:
 0: (XLIB::OPEN-X-STREAM "localhost" 10 :INTERNET)
 1: (XLIB:OPEN-DISPLAY "localhost" :DISPLAY 10 :PROTOCOL ...)
 2: ((METHOD CLIM-CLX::INITIALIZE-CLX NIL (CLIM-CLX::CLX-PORT)) (#(0 14 
15 14 15 ...) . #(# #)) #<unused-arg> #<CLIM-CLX::CLX-PORT  {5841DCBD}>)
 3: ("LAMBDA (PCL::.KEYARGS-START. PCL::.VALID-KEYS. #:G5790 #:G5791 
#:G5792)" #<#1=unused-arg> #<#1#> #<CLIM-CLX::CLX-PORT  {5841DCBD}> 
(:SERVER-PATH (:CLX :HOST "localhost" :DISPLAY-ID 10 ...)))
 4: ("DEFMETHOD MAKE-INSTANCE (CLASS)" #<#1=unused-arg> #<#1#> 
#<STANDARD-CLASS CLIM-CLX::CLX-PORT {582FB855}> (:SERVER-PATH (:CLX 
:HOST "localhost" :DISPLAY-ID 10 ...)))
 5: (CLIM:FIND-PORT :SERVER-PATH NIL)
 6: (CLIM:FIND-FRAME-MANAGER)
 7: ((METHOD CLIM:RUN-FRAME-TOP-LEVEL (:AROUND) 
#1=(CLIM:APPLICATION-FRAME)) (#(14 13) . #(#)) #S(PCL::FAST-METHOD-CALL 
:FUNCTION #<Function (METHOD CLIM:RUN-FRAME-TOP-LEVEL NIL #1#) 
{59AE7911}> :PV-CELL (# . #) :NEXT-METHOD-CALL NIL :ARG-INFO (1 . T)) 
#<CLIM-DEMO::CLIM-FIG {58108A6D}> NIL)
 8: (SWANK::EVAL-REGION "(clim-demo::clim-fig)
" T)
----------------------------------------

Any idea of how I can have the thing working?

Irène

-- 
Irène DURAND
http://dept-info.labri.u-bordeaux.fr/~idurand