[mcclim-devel] CLX backend or OpenGL backend with ClozureCL on OS X (also posted on c.l.l)

[Frank Gönninger]

Hi all:

Being completely new to McCLIM and Clozure CL I tried running the sample apps from McCLIM doc's chapter 3. All fine with the Gtk Cairo backend, but no chance with the CLX or OpenGL backends. CLX itself works fine.

Using Quicklisp I loaded the required packages:

? (ql:quickload "clx")
To load "clx":
  Load 1 ASDF system:
    clx
; Loading "clx"

("clx")
? (ql:quickload "spatial-trees")
To load "spatial-trees":
  Load 1 ASDF system:
    spatial-trees
; Loading "spatial-trees"

("spatial-trees")
? (ql:quickload "clim")
To load "clim":
  Load 1 ASDF system:
    clim
; Loading "clim"
....
("clim")

;;; OK, so far. Now let's define CLX as the backend...

? (setq clim:*default-server-path* '(:clx))

(:CLX)

;;; Following the McCLIM's Chapter 3 "The First Application" I
;;; tried the sample app:

?  (app::app-main)

> Error: NIL is not of type (OR SYMBOL FUNCTION), and can't be FUNCALLed or APPLYed
> While executing: CLIM:FIND-PORT, in process Listener(6).
> Type cmd-. to abort, cmd-\ for a list of available restarts.
> Type :? for other options.

;;; Hmpf ?!? Ok, CLX seems to be the problem. Backtrace shows:

1 > :b
*(161D78B8) : 0 (FIND-PORT :SERVER-PATH (:CLX)) 265
 (161D7930) : 1 (FIND-FRAME-MANAGER) 509
 (161D7968) : 2 (FUNCALL #'#<#<STANDARD-METHOD CLIM:RUN-FRAME-TOP-LEVEL :AROUND (CLIM:APPLICATION-FRAME)>> #<APP::SUPERAPP #x302003283C0D>) 405
 (161D7A40) : 3 (%%STANDARD-COMBINED-METHOD-DCODE (#<STANDARD-METHOD CLIM:RUN-FRAME-TOP-LEVEL :AROUND #> #<STANDARD-METHOD CLIM:RUN-FRAME-TOP-LEVEL #>) 46378838) 693
 (161D7AC0) : 4 (CALL-CHECK-REGS APP:APP-MAIN) 221
 (161D7AF8) : 5 (TOPLEVEL-EVAL (APP:APP-MAIN) NIL) 701
 (161D7B98) : 6 (READ-LOOP :INPUT-STREAM #<SYNONYM-STREAM to *TERMINAL-IO* #x302000B013BD> :OUTPUT-STREAM #<SYNONYM-STREAM to *TERMINAL-IO* #x302000B0125D> :BREAK-LEVEL 0 :PROMPT-FUNCTION #<Compiled-function (:INTERNAL CCL::READ-LOOP) (Non-Global)  #x30000058146F>) 2269
 (161D7DF0) : 7 (TOPLEVEL-LOOP) 101
 (161D7E18) : 8 (FUNCALL #'#<(:INTERNAL CCL::MAKE-MCL-LISTENER-PROCESS)>) 741
 (161D7EB8) : 9 (RUN-PROCESS-INITIAL-FORM #<COCOA-LISTENER-PROCESS Listener(6) [Active] #x302000B63D7D> (#<COMPILED-LEXICAL-CLOSURE # #x302000B6372F>)) 677
 (161D7F48) : 10 (FUNCALL #'#<(:INTERNAL (CCL::%PROCESS-PRESET-INTERNAL (PROCESS)))> #<COCOA-LISTENER-PROCESS Listener(6) [Active] #x302000B63D7D> (#<COMPILED-LEXICAL-CLOSURE # #x302000B6372F>)) 389
 (161D7F98) : 11 (FUNCALL #'#<(:INTERNAL CCL::THREAD-MAKE-STARTUP-FUNCTION)>) 301
1 > 

I'd have to dig deeper but maybe there's someone on here you already can point in the right direction ?!?

THX!

Best,
  Frank