[mcclim-devel] Problems with McClim demo
Damien Kick
dkixk at earthlink.net
Sun Nov 12 22:05:21 UTC 2006
On Nov 12, 2006, at 11:37, Mike McDonald wrote:
>
>> To: mcclim-devel at common-lisp.net
>> Date: Sun, 12 Nov 2006 16:57:58 +0100
>> From: "Willem Broekema"
>>
>> FWIW, I'm on Mac OS X (Intel), and today's CVS code works for me
>> (ACL 8.0).
>> I got rid of the "no protocol specified" error by doing "xhost +".
>>
>> Damien, if after xhost it still does not work: can you start an X app
>> like xcalc in an Emacs shell? (At least that's what I use to
>> determine
>> if the problem is on the X or Lisp side...)
>
> One of the more recent updates to the Intenl version of OSX turns
> off TCP connections to the X server. You may need to use the command
> "defaults" to turn it back on. Then use the 'xhost +' command every
> time you start X and want to run McCLIM.
I'm running Mac OS on PPC. The 'xhost +' solved the problem with
open-display. On to the next problem <grin>. Now I can start the
address-book demo but when I type 'help' into the frame with
'Command', I do not see 'help' echoed back to me and, as soon as I
hit RET, I get the condition and stack trace below, which I also see
if I don't run from SLIME but from an xterm.
attempt to call `#:STREAM59292' which is an undefined function.
[Condition of type UNDEFINED-FUNCTION]
Restarts:
0: [TRY-AGAIN] Try calling #:STREAM59292 again.
1: [RETURN-VALUE] Return a value instead of calling #:STREAM59292.
2: [USE-VALUE] Try calling a function other than #:STREAM59292.
3: [STORE-VALUE] Setf the symbol-function of #:STREAM59292 and
call it again.
4: [ABORT] Return to application command loop
5: [ABORT-REQUEST] Abort handling SLIME request.
6: [ABORT] Abort entirely from this (lisp) process.
Backtrace:
0: (SWANK::DEBUG-IN-EMACS #<UNDEFINED-FUNCTION @ #x11c793da>)
1: (SWANK:SWANK-DEBUGGER-HOOK #<UNDEFINED-FUNCTION @ #x11c793da>
#<Function SWANK-DEBUGGER-HOOK>)
2: (ERROR #<UNDEFINED-FUNCTION @ #x11c793da>)
3: (#:STREAM59292)
4: (CLIM-INTERNALS::COM-HELP%PARTIAL%19 #<STANDARD-COMMAND-TABLE
ADDRESS-BOOK @ #x1177565a> #<INTERACTOR-PANE INTERACTOR @ #x11b5ab3a>
(CLIM-INTERNALS::COM-HELP #:UNSUPPLIED-ARGUMENT-MARKER486))
5: (COMMAND-LINE-READ-REMAINING-ARGUMENTS-FOR-PARTIAL-COMMAND
#<STANDARD-COMMAND-TABLE ADDRESS-BOOK @ #x1177565a> #<CLIM-
INTERNALS::GOATEE-INPUT-EDITING-STREAM @ #x11b5abb2> (CLIM-
INTERNALS::COM-HELP #:UNSUPPLIED-ARGUMENT-MARKER486) 1)
6: ((METHOD CLIM-INTERNALS::%ACCEPT (CLIM-INTERNALS::|
(presentation-type CLIM::COMMAND)| T T TEXTUAL-VIEW)) #<CLIM-
INTERNALS::|(presentation-type CLIM::COMMAND)| @ #x10bfc57a>
(COMMAND :COMMAND-TABLE #<STANDARD-COMMAND-TABLE ADDRESS-BOOK @
#x1177565a>) #<CLIM-INTERNALS::GOATEE-INPUT-EDITING-STREAM @
#x11b5abb2> #<TEXTUAL-VIEW @ #x10955982>)
7: ((:INTERNAL (:EFFECTIVE-METHOD 4 T T NIL NIL) 0) #<CLIM-
INTERNALS::|(presentation-type CLIM::COMMAND)| @ #x10bfc57a>
(COMMAND :COMMAND-TABLE #<STANDARD-COMMAND-TABLE ADDRESS-BOOK @
#x1177565a>) #<CLIM-INTERNALS::GOATEE-INPUT-EDITING-STREAM @
#x11b5abb2> #<TEXTUAL-VIEW @ #x10955982> :DEFAULT (CLIM-
INTERNALS::COM-NULL-COMMAND) :DEFAULT-TYPE CLIM-INTERNALS::NULL-COMMAND)
8: ((FLET (:INTERNAL ACCEPT-1 0) #:INPUT-CONT34099))
9: (CLIM-INTERNALS::INVOKE-HANDLE-EMPTY-INPUT #<CLIM-
INTERNALS::GOATEE-INPUT-EDITING-STREAM @ #x11b5abb2> #<Closure (FLET
(:INTERNAL ACCEPT-1 0) #:INPUT-CONT34099) @ #xbfff8622> #<Closure
(FLET (:INTERNAL ACCEPT-1 0) #:HANDLER-CONT34100) @ #xbfff8632>)
10: ((:INTERNAL ACCEPT-1 0) #<CLIM-INTERNALS::GOATEE-INPUT-EDITING-
STREAM @ #x11b5abb2>)
11: ((METHOD CLIM-INTERNALS::INVOKE-WITH-INPUT-EDITING (CLIM-STREAM-
PANE T T T T)) #<INTERACTOR-PANE INTERACTOR @ #x11b5ab3a> #<Closure
(:INTERNAL ACCEPT-1 0) @ #x11b5b0a2> #<Closure (:INTERNAL ACCEPT-1 1)
@ #x11b5b0ba> "" CLIM-INTERNALS::GOATEE-INPUT-EDITING-STREAM)
12: ((METHOD CLIM-INTERNALS::INVOKE-WITH-INPUT-EDITING :AROUND (T T T
T T)) #<INTERACTOR-PANE INTERACTOR @ #x11b5ab3a> #<Closure (:INTERNAL
ACCEPT-1 0) @ #x11b5b0a2> #<Closure (:INTERNAL ACCEPT-1 1) @
#x11b5b0ba> "" CLIM-INTERNALS::GOATEE-INPUT-EDITING-STREAM)
13: ((METHOD CLIM-INTERNALS::INVOKE-WITH-INPUT-EDITING :AROUND
(EXTENDED-OUTPUT-STREAM T T T T)) #<INTERACTOR-PANE INTERACTOR @
#x11b5ab3a> #<Closure (:INTERNAL ACCEPT-1 0) @ #x11b5b0a2> #<Closure
(:INTERNAL ACCEPT-1 1) @ #x11b5b0ba> "" CLIM-INTERNALS::GOATEE-INPUT-
EDITING-STREAM)
14: ((:INTERNAL (:EFFECTIVE-METHOD 5 NIL NIL T T) 0) #<INTERACTOR-
PANE INTERACTOR @ #x11b5ab3a> #<Closure (:INTERNAL ACCEPT-1 0) @
#x11b5b0a2> #<Closure (:INTERNAL ACCEPT-1 1) @ #x11b5b0ba> "" CLIM-
INTERNALS::GOATEE-INPUT-EDITING-STREAM)
15: (ACCEPT-1 #<INTERACTOR-PANE INTERACTOR @ #x11b5ab3a>
(COMMAND :COMMAND-TABLE #<STANDARD-COMMAND-TABLE ADDRESS-BOOK @
#x1177565a>) :DEFAULT (CLIM-INTERNALS::COM-NULL-COMMAND) :DEFAULT-
TYPE CLIM-INTERNALS::NULL-COMMAND :PROMPT NIL)
16: ((METHOD STREAM-ACCEPT (STANDARD-EXTENDED-INPUT-STREAM T))
#<INTERACTOR-PANE INTERACTOR @ #x11b5ab3a> (COMMAND :COMMAND-TABLE
#<STANDARD-COMMAND-TABLE ADDRESS-BOOK @ #x1177565a>))
17: ((FLET ACCEPT CLIM-INTERNALS::DO-ACCEPT) (:DEFAULT-TYPE CLIM-
INTERNALS::NULL-COMMAND :PROMPT NIL :DEFAULT (CLIM-INTERNALS::COM-
NULL-COMMAND) :DEFAULT-TYPE CLIM-INTERNALS::NULL-COMMAND))
18: (ACCEPT (COMMAND :COMMAND-TABLE #<STANDARD-COMMAND-TABLE ADDRESS-
BOOK @ #x1177565a>) :STREAM #<INTERACTOR-PANE INTERACTOR @
#x11b5ab3a> :PROMPT NIL :DEFAULT (CLIM-INTERNALS::COM-NULL-
COMMAND) :DEFAULT-TYPE CLIM-INTERNALS::NULL-COMMAND)
19: (READ-COMMAND #<STANDARD-COMMAND-TABLE ADDRESS-BOOK @
#x1177565a> :STREAM #<INTERACTOR-PANE INTERACTOR @ #x11b5ab3a>)
20: (READ-COMMAND-USING-KEYSTROKES #<STANDARD-COMMAND-TABLE ADDRESS-
BOOK @ #x1177565a> NIL :STREAM #<INTERACTOR-PANE INTERACTOR @
#x11b5ab3a>)
21: (READ-COMMAND #<STANDARD-COMMAND-TABLE ADDRESS-BOOK @
#x1177565a> :STREAM #<INTERACTOR-PANE INTERACTOR @ #x11b5ab3a> :USE-
KEYSTROKES T)
22: ((METHOD READ-FRAME-COMMAND (APPLICATION-FRAME)) #<ADDRESS-BOOK @
#x11b5ad32> :STREAM #<INTERACTOR-PANE INTERACTOR @ #x11b5ab3a>)
23: ((METHOD READ-FRAME-COMMAND :AROUND (APPLICATION-FRAME))
#<ADDRESS-BOOK @ #x11b5ad32> :STREAM #<INTERACTOR-PANE INTERACTOR @
#x11b5ab3a>)
24: ((:INTERNAL (:EFFECTIVE-METHOD 1 T T T T) 0) #<ADDRESS-BOOK @
#x11b5ad32> :STREAM #<INTERACTOR-PANE INTERACTOR @ #x11b5ab3a>)
25: ((METHOD DEFAULT-FRAME-TOP-LEVEL (APPLICATION-FRAME)) #<ADDRESS-
BOOK @ #x11b5ad32>)
26: ((:INTERNAL (:EFFECTIVE-METHOD 1 T T NIL NIL) 0) #<ADDRESS-BOOK @
#x11b5ad32>)
27: ((:INTERNAL (ACLMOP:CLASS-DEFAULT-INITARGS ADDRESS-BOOK :TOP-
LEVEL-LAMBDA) 0) #<ADDRESS-BOOK @ #x11b5ad32>)
28: ((METHOD RUN-FRAME-TOP-LEVEL (APPLICATION-FRAME)) #<ADDRESS-BOOK
@ #x11b5ad32>)
29: ((METHOD RUN-FRAME-TOP-LEVEL :AROUND (APPLICATION-FRAME))
#<ADDRESS-BOOK @ #x11b5ad32>)
30: ((:INTERNAL (:EFFECTIVE-METHOD 1 T NIL T T) 0) #<ADDRESS-BOOK @
#x11b5ad32> . #<non-lisp object @ #x1>)
31: (EVAL (RUN-FRAME-TOP-LEVEL (MAKE-APPLICATION-FRAME (QUOTE ADDRESS-
BOOK))))
32: (SWANK::EVAL-REGION "(run-frame-top-level (make-application-frame
'address-book))
" T)
33: ((:INTERNAL SWANK:LISTENER-EVAL 0))
34: ((METHOD SWANK-BACKEND:CALL-WITH-SYNTAX-HOOKS (T)) #<Closure
(:INTERNAL SWANK:LISTENER-EVAL 0) @ #x11b5b65a>)
35: (SWANK::CALL-WITH-BUFFER-SYNTAX #<Closure (:INTERNAL
SWANK:LISTENER-EVAL 0) @ #x11b5b65a>)
36: (SWANK:LISTENER-EVAL "(run-frame-top-level (make-application-
frame 'address-book))
")
37: (EVAL (SWANK:LISTENER-EVAL "(run-frame-top-level (make-
application-frame 'address-book))
"))
38: ((:INTERNAL SWANK::EVAL-FOR-EMACS 0))
39: ((METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T T)) #<Function
SWANK-DEBUGGER-HOOK> #<Closure (:INTERNAL SWANK::EVAL-FOR-EMACS 0) @
#x11b5b672>)
40: (SWANK::EVAL-FOR-EMACS (SWANK:LISTENER-EVAL "(run-frame-top-level
(make-application-frame 'address-book))
") "CLIM-DEMO" 34)
41: (FUNCALL SWANK::EVAL-FOR-EMACS (SWANK:LISTENER-EVAL "(run-frame-
top-level (make-application-frame 'address-book))
") "CLIM-DEMO" 34)
42: (SWANK::READ-FROM-EMACS)
43: ((:INTERNAL SWANK::HANDLE-REQUEST 0))
44: ((METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T T)) #<Function
SWANK-DEBUGGER-HOOK> #<Function (:INTERNAL SWANK::HANDLE-REQUEST 0)>)
45: ((:INTERNAL SWANK::CALL-WITH-CONNECTION 0))
46: (SWANK::CALL-WITH-REDIRECTED-IO #<SWANK::CONNECTION @ #x1071458a>
#<Closure (:INTERNAL SWANK::CALL-WITH-CONNECTION 0) @ #x11b5b6ba>)
47: (SWANK::MAYBE-CALL-WITH-IO-REDIRECTION #<SWANK::CONNECTION @
#x1071458a> #<Closure (:INTERNAL SWANK::CALL-WITH-CONNECTION 0) @
#x11b5b6ba>)
48: (SWANK::CALL-WITH-CONNECTION #<SWANK::CONNECTION @ #x1071458a>
#<Function (:INTERNAL SWANK::HANDLE-REQUEST 0)>)
49: (SWANK::HANDLE-REQUEST #<SWANK::CONNECTION @ #x1071458a>)
50: ((:INTERNAL SWANK::REPL-LOOP 0))
51: ((METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T T)) #<Function
SWANK-DEBUGGER-HOOK @ #x106a2f12> #<Closure (:INTERNAL SWANK::REPL-
LOOP 0) @ #x107155f2>)
52: ((:INTERNAL SWANK::CALL-WITH-CONNECTION 0))
53: (SWANK::CALL-WITH-REDIRECTED-IO #<SWANK::CONNECTION @ #x1071458a>
#<Closure (:INTERNAL SWANK::CALL-WITH-CONNECTION 0) @ #x10715612>)
54: (SWANK::MAYBE-CALL-WITH-IO-REDIRECTION #<SWANK::CONNECTION @
#x1071458a> #<Closure (:INTERNAL SWANK::CALL-WITH-CONNECTION 0) @
#x10715612>)
55: (SWANK::CALL-WITH-CONNECTION #<SWANK::CONNECTION @ #x1071458a>
#<Closure (:INTERNAL SWANK::REPL-LOOP 0) @ #x107155f2>)
56: (SWANK::REPL-LOOP #<SWANK::CONNECTION @ #x1071458a>)
57: ((:INTERNAL (:INTERNAL SWANK::SPAWN-REPL-THREAD 0) 0))
58: (SWANK::CALL-WITH-BINDINGS NIL #<Closure (:INTERNAL (:INTERNAL
SWANK::SPAWN-REPL-THREAD 0) 0) @ #x1071564a>)
59: ((:INTERNAL SWANK::SPAWN-REPL-THREAD 0))
More information about the mcclim-devel
mailing list