On Mon, Dec 27, 2010 at 11:36:24AM +0100, Frank G?nninger wrote:
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")
Why do you perform such a selective load? So far I had better luck just doing a:
(ql:quickload "mcclim")
;;; OK, so far. Now let's define CLX as the backend...
? (setq clim:*default-server-path* '(:clx))
(:CLX)
Without (ql:quickload "clim-clx") this won't work. CLX by itself only provides the API to communicate with a X server, the X backend is defined inclim-cxl.
HTH Ralf Mattes
;;; 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
mcclim-devel mailing list mcclim-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/mcclim-devel