[Bese-devel] ucw_ajax / OpenMCL / OSX
Daniel Salama
lists at infoway.net
Sun Oct 22 23:05:31 UTC 2006
Ok.
Downloaded your patch and connected via Slime.
When I launch the browser into http://127.0.0.1:8080/, Slime shows
(sorry for the long output; I expanded all the backtraces):
Required arguments in #<IT.BESE.UCW:DOJO-TAB #x8A57F3E> don't match
lambda list (IT.BESE.UCW::KEY
. IT.BESE.UCW::COMP).
[Condition of type CCL::SIMPLE-PROGRAM-ERROR]
Restarts:
0: [SHOW-BACKTRACE] Send the client a backtrace page.
1: [SERVER-ERROR] Send the client an internal server error page.
2: [GENERATE-BACKTRACE-FOR-EMACS] Generate a bug report in Emacs.
3: [FAIL-MISERABLY] Pretend this request never happend and fail.
4: [TRY-AGAIN] Play this request over from the top.
5: [ABORT-BREAK] Reset this process
6: [ABORT] Kill this process
Backtrace:
0: (#<Anonymous Function #x83F2A5E> 0 20)
Locals:
SWANK-BACKEND::INDEX = 0
#:COMPILER-VAR = (0 &KEY SWANK::NAME SWANK::ID SWANK::VALUE)
Catch-tags:
NIL
1: (SWANK:BACKTRACE 1 40)
Locals:
SWANK::INDEX = 1
#:G2016 = (NIL (:NAME "SWANK::INDEX" :ID 0 :VALUE "1"))
2: (CCL::CALL-CHECK-REGS 'SWANK:BACKTRACE)
Locals:
CCL::FN = SWANK:FRAME-LOCALS-FOR-EMACS
CCL::ARGS = (2)
CCL::OLD-REGS = ((#1=#<RESTART ABORT #x11A92CE>) 1 #1#
(SWANK-BACKEND:SLDB-CONDITION #<Compiled-function SWANK::HANDLE-SLDB-
CONDITION #x8426E76>) SWANK::SEND-TO-EMACS SWANK-BACKEND:CURRENT-
THREAD (#<RESTART IT.BESE.UCW::SHOW-BACKTRACE #x11A951E>) (#S
(IT.BESE.UCW::BACKTRACE-FRAME :INDEX 4 :DESCRIPTION
"(IT.BESE.UCW::COLLECT-BACKTRACE #<CCL::SIMPLE-PROGRAM-ERROR
#x8AF514E>)" :LOCALS (# #) :SOURCE-LOCATION (:ERROR "No source info
available for #<Anonymous Function #x8868DEE>")) #S
(IT.BESE.UCW::BACKTRACE-FRAME :INDEX 5 :DESCRIPTION "(#<Anonymous
Function #x8868DEE> '(NIL) #<CCL::SIMPLE-PROGRAM-ERROR
#x8AF514E>)" :LOCALS (# #) :SOURCE-LOCATION (:LOCATION # # NIL)) #S
(IT.BESE.UCW::BACKTRACE-FRAME :INDEX 6 :DESCRIPTION "(SIGNAL
#<CCL::SIMPLE-PROGRAM-ERROR #x8AF514E>)" :LOCALS (# #) :SOURCE-
LOCATION (:LOCATION # # NIL)) #S(IT.BESE.UCW::BACKTRACE-FRAME :INDEX
7 :DESCRIPTION "(CCL::%ERROR 'NIL -66163180 #<CCL::DESTRUCTURE-STATE
#x11A95B6>)" :LOCALS NIL :SOURCE-LOCATION (:LOCATION # # NIL)) #S
(IT.BESE.UCW::BACKTRACE-FRAME :INDEX 8 :DESCRIPTION "(CCL::%POP-
REQUIRED-ARG-PTR '(#<IT.BESE.UCW:DOJO-TAB #x8AF690E>))" :LOCALS (# #
#) :SOURCE-LOCATION (:LOCATION # # NIL)) #S(IT.BESE.UCW::BACKTRACE-
FRAME :INDEX 9 :DESCRIPTION "(#<STANDARD-METHOD SHARED-
INITIALIZE :AFTER (IT.BESE.UCW:CONTAINER T)> #<IT.BESE.UCW-USER::DOJO-
TAB-EXAMPLE #x8AF5A8E> 'T)" :LOCALS (# # # # # #) :SOURCE-LOCATION
(:LOCATION # # NIL)) #S(IT.BESE.UCW::BACKTRACE-FRAME :INDEX
10 :DESCRIPTION "(CCL::%%BEFORE-AND-AFTER-COMBINED-METHOD-DCODE '(NIL
#<STANDARD-METHOD SHARED-INITIALIZE :AFTER (IT.BESE.UCW:CONTAINER T)
> . 4481748))" :LOCALS (#) :SOURCE-LOCATION (:LOCATION # # NIL)) #S
(IT.BESE.UCW::BACKTRACE-FRAME :INDEX 11 :DESCRIPTION "(CCL::%%
STANDARD-COMBINED-METHOD-DCODE '(NIL #<CCL::STANDARD-KERNEL-METHOD
INITIALIZE-INSTANCE (STANDARD-OBJECT)> . 4481791) '(#<CCL::STANDARD-
KERNEL-METHOD INITIALIZE-INSTANCE (STANDARD-OBJECT)>))" :LOCALS (# #
#) :SOURCE-LOCATION (:LOCATION # # NIL)) #S(IT.BESE.UCW::BACKTRACE-
FRAME :INDEX 12 :DESCRIPTION "(CCL::%CALL-NEXT-METHOD '(NIL
#<CCL::STANDARD-KERNEL-METHOD INITIALIZE-INSTANCE (STANDARD-OBJECT)
> . 4481791))" :LOCALS (# # # # # #) :SOURCE-LOCATION (:LOCATION # #
NIL)) #S(IT.BESE.UCW::BACKTRACE-FRAME :INDEX 13 :DESCRIPTION "(CCL::%%
BEFORE-AND-AFTER-COMBINED-METHOD-DCODE '(NIL #<CCL::STANDARD-KERNEL-
METHOD INITIALIZE-INSTANCE (STANDARD-OBJECT)> . 4481791))" :LOCALS
(#) :SOURCE-LOCATION (:LOCATION # # NIL)) ...))
3: (#<Anonymous Function #x842BF7E> '(SWANK:BACKTRACE 1 40) 3 'NIL)
Locals:
SWANK::FORM = (SWANK:FRAME-LOCALS-FOR-EMACS 3)
SWANK::ID = 11
SWANK::BUFFER-PACKAGE = NIL
SWANK::OK = NIL
SWANK::RESULT = NIL
SWANK::*BUFFER-PACKAGE* = #<Unbound>
SWANK::*BUFFER-READTABLE* = #<Unbound>
SWANK::*PENDING-CONTINUATIONS* = NIL
Catch-tags:
NIL
4: (#<Anonymous Function #x83B1D96> #<Compiled-function
SWANK:SWANK-DEBUGGER-HOOK #x8427F16> #<COMPILED-LEXICAL-CLOSURE
#x8ABFCCE>)
Locals:
SWANK-BACKEND::HOOK = #<Compiled-function SWANK:SWANK-
DEBUGGER-HOOK #x8427F16>
SWANK-BACKEND::FUN = #<COMPILED-LEXICAL-CLOSURE #x8AB3356>
*DEBUGGER-HOOK* = NIL
5: (FUNCALL 'SWANK::EVAL-FOR-EMACS)
Locals:
CCL::FN = SWANK::EVAL-FOR-EMACS
CCL::ARGS = ((SWANK:FRAME-LOCALS-FOR-EMACS 5) NIL 15)
6: (SWANK::SLDB-LOOP '(T 200 T NIL 10 T #S(CCL::PPRINT-DISPATCH-
TABLE :CONSES-WITH-CARS #<HASH-TABLE :TEST EQ size 60/60
#x83F5686> :STRUCTURES NIL :OTHERS (# #)) NIL T 10 ...))
Locals:
CCL::%RESTARTS% = ((#<RESTART IT.BESE.UCW::SHOW-BACKTRACE
#x11A951E>) (#<RESTART IT.BESE.UCW::SERVER-ERROR #x11A9AE6> #<RESTART
IT.BESE.UCW::GENERATE-BACKTRACE-FOR-EMACS #x11A9B0E>) (#<RESTART
IT.BESE.UCW::FAIL-MISERABLY #x11A9C16> #<RESTART IT.BESE.UCW::TRY-
AGAIN #x11A9C3E>) (#<RESTART ABORT-BREAK #x11A9DF6> #<RESTART ABORT
#x11A9E1E>))
CCL::%HANDLERS% = ((ERROR #<Anonymous Function #x885EDB6>)
(ERROR #<COMPILED-LEXICAL-CLOSURE #x8A5C616>) (STREAM-ERROR
#<COMPILED-LEXICAL-CLOSURE #x8A5CDA6> ERROR #<COMPILED-LEXICAL-
CLOSURE IT.BESE.UCW::ABORT-WORKER #x8A5CDBE>) (PROCESS-RESET))
Catch-tags:
(:RESTART ABORT)
SWANK::SLDB-LOOP-CATCHER
SWANK::SLDB-ENTER-DEFAULT-DEBUGGER
NIL
7: (#<Anonymous Function #x83F350E> #<Anonymous Function #x842756E>)
Locals:
SWANK-BACKEND::DEBUGGER-LOOP-FN = #<Anonymous Function
#x842756E>
*DEBUGGER-HOOK* = #<Compiled-function SWANK:SWANK-DEBUGGER-
HOOK #x8427F16>
SWANK-BACKEND::*SLDB-STACK-TOP* = NIL
*SIGNAL-PRINTING-ERRORS* = T
8: (SWANK::CALL-WITH-BINDINGS '((*PRINT-PRETTY*) (*PRINT-LEVEL* .
4) (*PRINT-LENGTH* . 10) (*PRINT-CIRCLE* . T) (*PRINT-READABLY*)
(*PRINT-PPRINT-DISPATCH* . #S(CCL::PPRINT-DISPATCH-TABLE :CONSES-WITH-
CARS #<HASH-TABLE :TEST EQ size 60/60 #x83F5686> :STRUCTURES
NIL :OTHERS #)) (*PRINT-GENSYM* . T) (*PRINT-BASE* . 10) (*PRINT-
RADIX*) (*PRINT-ARRAY* . T) ...) #<Anonymous Function #x84275AE>)
Locals:
SWANK::ALIST = ((*PRINT-PRETTY*) (*PRINT-LEVEL* . 4) (*PRINT-
LENGTH* . 10) (*PRINT-CIRCLE* . T) (*PRINT-READABLY*) (*PRINT-PPRINT-
DISPATCH* . #S(CCL::PPRINT-DISPATCH-TABLE :CONSES-WITH-CARS #<HASH-
TABLE :TEST EQ size 60/60 #x83F5686> :STRUCTURES NIL :OTHERS (# #)))
(*PRINT-GENSYM* . T) (*PRINT-BASE* . 10) (*PRINT-RADIX*) (*PRINT-
ARRAY* . T) ...)
SWANK::FUN = #<Anonymous Function #x84275AE>
SWANK::RLIST = ((*PRINT-ESCAPE* . T) (*PRINT-LINES* . 200)
(*PRINT-ARRAY* . T) (*PRINT-RADIX*) (*PRINT-BASE* . 10) (*PRINT-
GENSYM* . T) (*PRINT-PPRINT-DISPATCH* . #S(CCL::PPRINT-DISPATCH-
TABLE :CONSES-WITH-CARS #<HASH-TABLE :TEST EQ size 60/60
#x83F5686> :STRUCTURES NIL :OTHERS (# #))) (*PRINT-READABLY*) (*PRINT-
CIRCLE* . T) (*PRINT-LENGTH* . 10) ...)
SWANK::VARS = (*PRINT-ESCAPE* *PRINT-LINES* *PRINT-ARRAY*
*PRINT-RADIX* *PRINT-BASE* *PRINT-GENSYM* *PRINT-PPRINT-DISPATCH*
*PRINT-READABLY* *PRINT-CIRCLE* *PRINT-LENGTH* ...)
Catch-tags:
NIL
9: (SWANK::DEBUG-IN-EMACS #<CCL::SIMPLE-PROGRAM-ERROR #x8A5CEFE>)
Locals:
CONDITION = #<CCL::SIMPLE-PROGRAM-ERROR #x8A5CEFE>
SWANK::*SWANK-DEBUGGER-CONDITION* = NIL
SWANK::*SLDB-RESTARTS* = NIL
*PACKAGE* = #<Package "COMMON-LISP-USER">
SWANK::*SLDB-LEVEL* = 0
SWANK::*SLDB-STEPPING-P* = NIL
SWANK::*SWANK-STATE-STACK* = NIL
10: (#<Anonymous Function #x83B1D96> #<Compiled-function SWANK:SWANK-
DEBUGGER-HOOK #x8427F16> #<COMPILED-LEXICAL-CLOSURE #x8A6597E>)
Locals:
SWANK-BACKEND::HOOK = #<Compiled-function SWANK:SWANK-
DEBUGGER-HOOK #x8427F16>
SWANK-BACKEND::FUN = #<COMPILED-LEXICAL-CLOSURE #x8A6532E>
*DEBUGGER-HOOK* = #<Compiled-function SWANK:SWANK-DEBUGGER-
HOOK #x8427F16>
11: (SWANK::CALL-WITH-REDIRECTED-IO #<COMPILED-LEXICAL-CLOSURE
#x8A65966> 'IT.BESE.ARNESI:GET-LOGGER)
Locals:
FUNCTION = #<COMPILED-LEXICAL-CLOSURE #x8A65316>
SWANK::IN = #<SWANK-BACKEND::SLIME-INPUT-STREAM #x8A4628E>
*STANDARD-OUTPUT* = #<SYNONYM-STREAM to *TERMINAL-IO*
#x8389296>
*ERROR-OUTPUT* = #<SYNONYM-STREAM to *TERMINAL-IO* #x838926E>
*TRACE-OUTPUT* = #<SYNONYM-STREAM to *TERMINAL-IO* #x8389296>
*DEBUG-IO* = #<SYNONYM-STREAM to *TERMINAL-IO* #x8389246>
*QUERY-IO* = #<SYNONYM-STREAM to *TERMINAL-IO* #x8389246>
*STANDARD-INPUT* = #<SYNONYM-STREAM to *TERMINAL-IO* #x838935E>
*TERMINAL-IO* = #<ECHOING-TWO-WAY-STREAM input #<FD-
CHARACTER-INPUT-STREAM (TTY/0) #x8389966>, output #<FD-CHARACTER-
OUTPUT-STREAM (TTY/1) #x83896EE> #x8389436>
12: (SWANK::CALL-WITH-CONNECTION #<CONNECTION #x8A48376> #<COMPILED-
LEXICAL-CLOSURE #x8A6597E>)
Locals:
SWANK::CONNECTION = #<CONNECTION #x8A48376>
SWANK::FUN = #<COMPILED-LEXICAL-CLOSURE #x8A6532E>
SWANK::*EMACS-CONNECTION* = NIL
13: (#<STANDARD-METHOD IT.BESE.UCW::HANDLE-ACTION-ERROR (ERROR T)>
#<COMPILED-LEXICAL-CLOSURE #x8A59C86> #<CCL::SIMPLE-PROGRAM-ERROR
#x8A5CEFE>)
Locals:
#:G12790 = (ERROR #<Anonymous Function #x885EDB6>)
CCL::%HANDLERS% = ((ERROR #<COMPILED-LEXICAL-CLOSURE
#x8A5C616>) (STREAM-ERROR #<COMPILED-LEXICAL-CLOSURE #x8A5CDA6> ERROR
#<COMPILED-LEXICAL-CLOSURE IT.BESE.UCW::ABORT-WORKER #x8A5CDBE>)
(PROCESS-RESET))
#:G12796 = #<RESTART IT.BESE.UCW::SHOW-BACKTRACE #x11A951E>
CCL::%RESTARTS% = ((#<RESTART IT.BESE.UCW::SERVER-ERROR
#x11A9AE6> #<RESTART IT.BESE.UCW::GENERATE-BACKTRACE-FOR-EMACS
#x11A9B0E>) (#<RESTART IT.BESE.UCW::FAIL-MISERABLY #x11A9C16>
#<RESTART IT.BESE.UCW::TRY-AGAIN #x11A9C3E>) (#<RESTART ABORT-BREAK
#x11A9DF6> #<RESTART ABORT #x11A9E1E>))
Catch-tags:
(:RESTART IT.BESE.UCW::SHOW-BACKTRACE)
14: (#<Anonymous Function #x8868DEE> '(NIL) #<CCL::SIMPLE-PROGRAM-
ERROR #x8A5CEFE>)
Locals:
#:COMPILER-VAR = (NIL)
#:CONDITION-12997 = #<CCL::SIMPLE-PROGRAM-ERROR #x8A5CEFE>
Catch-tags:
IT.BESE.UCW::ABORT-ACTION
15: (SIGNAL #<CCL::SIMPLE-PROGRAM-ERROR #x8A5CEFE>)
Locals:
CCL::ARGS = NIL
CCL::%HANDLERS% = ((ERROR #<COMPILED-LEXICAL-CLOSURE
#x8A59C86>) (ERROR #<COMPILED-LEXICAL-CLOSURE #x8A5C616>) (STREAM-
ERROR #<COMPILED-LEXICAL-CLOSURE #x8A5CDA6> ERROR #<COMPILED-LEXICAL-
CLOSURE IT.BESE.UCW::ABORT-WORKER #x8A5CDBE>) (PROCESS-RESET))
16: (CCL::%ERROR 'NIL -66163180 #<CCL::DESTRUCTURE-STATE #x11A95B6>)
Locals:
CCL::ARGS = NIL
CCL::ERROR-POINTER = -66163180
17: (CCL::%POP-REQUIRED-ARG-PTR '(#<IT.BESE.UCW:DOJO-TAB #x8A5D956>))
Locals:
18: (#<STANDARD-METHOD SHARED-INITIALIZE :AFTER
(IT.BESE.UCW:CONTAINER T)> #<IT.BESE.UCW-USER::DOJO-TAB-EXAMPLE
#x8A5D2BE> 'T)
Locals:
IT.BESE.UCW::SLOT-NAMES = T
IT.BESE.UCW::CONTENTS = (#<IT.BESE.UCW:DOJO-TAB #x8A57F3E>
#<IT.BESE.UCW:DOJO-TAB #x8A5D956>)
IT.BESE.UCW::INITARGS = (:DOM-ID "top-level-tab-
example" :CONTENTS (#<IT.BESE.UCW:DOJO-TAB #x8A57F3E>
#<IT.BESE.UCW:DOJO-TAB #x8A5D956>) :DO-LAYOUT-P NIL :CSS-CLASS "tab-
example" :CLOSE-BUTTON "tab" ...)
19: (CCL::%%BEFORE-AND-AFTER-COMBINED-METHOD-DCODE '(NIL #<STANDARD-
METHOD SHARED-INITIALIZE :AFTER (IT.BESE.UCW:CONTAINER T)> . 4481748))
Locals:
CCL::METHODS = (NIL (#<STANDARD-METHOD SHARED-
INITIALIZE :AFTER (IT.BESE.UCW:STANDARD-COMPONENT T)> #<STANDARD-
METHOD SHARED-INITIALIZE :AFTER (IT.BESE.UCW:CONTAINER T)>)
#<CCL::STANDARD-KERNEL-METHOD SHARED-INITIALIZE (STANDARD-OBJECT T)>)
CCL::BEFORES = NIL
CCL::CDR-METHS = ((#<STANDARD-METHOD SHARED-
INITIALIZE :AFTER (IT.BESE.UCW:STANDARD-COMPONENT T)> #<STANDARD-
METHOD SHARED-INITIALIZE :AFTER (IT.BESE.UCW:CONTAINER T)>)
#<CCL::STANDARD-KERNEL-METHOD SHARED-INITIALIZE (STANDARD-OBJECT T)>)
CCL::PRIMARIES = (#<CCL::STANDARD-KERNEL-METHOD SHARED-
INITIALIZE (STANDARD-OBJECT T)>)
CCL::AFTERS = (#<STANDARD-METHOD SHARED-INITIALIZE :AFTER
(IT.BESE.UCW:STANDARD-COMPONENT T)> #<STANDARD-METHOD SHARED-
INITIALIZE :AFTER (IT.BESE.UCW:CONTAINER T)>)
CDR = NIL
20: (CCL::%%STANDARD-COMBINED-METHOD-DCODE '(NIL #<CCL::STANDARD-
KERNEL-METHOD INITIALIZE-INSTANCE (STANDARD-OBJECT)> . 4481791)
'(#<CCL::STANDARD-KERNEL-METHOD INITIALIZE-INSTANCE (STANDARD-OBJECT)>))
Locals:
CCL::CELL-2 = (#<STANDARD-METHOD SHARED-INITIALIZE :AFTER
(IT.BESE.UCW:CONTAINER T)> . 4481748)
21: (CCL::%CALL-NEXT-METHOD '(NIL #<CCL::STANDARD-KERNEL-METHOD
INITIALIZE-INSTANCE (STANDARD-OBJECT)> . 4481791))
Locals:
CCL::ARGS = NIL
CDR = NIL
METHOD-FUNCTION = #<METHOD-FUNCTION INITIALIZE-INSTANCE
(STANDARD-OBJECT)>
Catch-tags:
NIL
22: (CCL::%%BEFORE-AND-AFTER-COMBINED-METHOD-DCODE '(NIL
#<CCL::STANDARD-KERNEL-METHOD INITIALIZE-INSTANCE (STANDARD-OBJECT)
> . 4481791))
Locals:
CCL::METHODS = (NIL (#<STANDARD-METHOD INITIALIZE-
INSTANCE :AFTER (IT.BESE.UCW:DOJO-WIDGET-COMPONENT)>) #<STANDARD-
METHOD INITIALIZE-INSTANCE (IT.BESE.UCW:CONTAINER)> #<CCL::STANDARD-
KERNEL-METHOD INITIALIZE-INSTANCE (STANDARD-OBJECT)>)
CCL::BEFORES = NIL
CCL::CDR-METHS = ((#<STANDARD-METHOD INITIALIZE-
INSTANCE :AFTER (IT.BESE.UCW:DOJO-WIDGET-COMPONENT)>) #<STANDARD-
METHOD INITIALIZE-INSTANCE (IT.BESE.UCW:CONTAINER)> #<CCL::STANDARD-
KERNEL-METHOD INITIALIZE-INSTANCE (STANDARD-OBJECT)>)
CCL::PRIMARIES = (#<STANDARD-METHOD INITIALIZE-INSTANCE
(IT.BESE.UCW:CONTAINER)> #<CCL::STANDARD-KERNEL-METHOD INITIALIZE-
INSTANCE (STANDARD-OBJECT)>)
CCL::AFTERS = (#<STANDARD-METHOD INITIALIZE-INSTANCE :AFTER
(IT.BESE.UCW:DOJO-WIDGET-COMPONENT)>)
CDR = (#<CCL::STANDARD-KERNEL-METHOD INITIALIZE-INSTANCE
(STANDARD-OBJECT)>)
23: (CCL::%%STANDARD-COMBINED-METHOD-DCODE '(:DOM-ID "top-level-tab-
example" :CONTENTS (#<IT.BESE.UCW:DOJO-TAB #x8A57F3E>
#<IT.BESE.UCW:DOJO-TAB #x8A5D956>) :DO-LAYOUT-P NIL :CSS-CLASS "tab-
example" :CLOSE-BUTTON "tab" ...) #<IT.BESE.UCW:STANDARD-COMPONENT-
CLASS IT.BESE.UCW-USER::DOJO-TAB-EXAMPLE>)
Locals:
CCL::CELL-2 = (#<CCL::STANDARD-KERNEL-METHOD INITIALIZE-
INSTANCE (STANDARD-OBJECT)> . 4481791)
24: (CCL::%MAKE-STD-INSTANCE '(#(#1=#<STANDARD-GENERIC-FUNCTION
INITIALIZE-INSTANCE #x8072556> (#5=#<#> #<#> #3=#<#> #<#> #2=#<#>
#4=#<#>) (#1# #) #<Compiled-function CCL::%%CNM-WITH-ARGS-CHECK-
INITARGS #x8062886> (#2# # # #3# #4#)) #5# #<IT.BESE.UCW-
USER::EXAMPLE-WINDOW #x8A593F6> :TITLE "UCW Examples" :STYLESHEET ("/
ucw/ucw.css" "/static/examples.css") :DOM-ID "main-
splitter" :ICON ...) '(#<IT.BESE.UCW-USER::EXAMPLE-WINDOW
#x8A593F6> :TITLE "UCW Examples" :STYLESHEET ("/ucw/ucw.css" "/static/
examples.css") :DOM-ID "main-splitter" :ICON "/static/
favicon.ico" :DOJO-TYPE ...))
Locals:
CCL::INSTANCE = #<IT.BESE.UCW-USER::DOJO-TAB-EXAMPLE #x8A5D2BE>
25: (#<CCL::STANDARD-KERNEL-METHOD MAKE-INSTANCE (STANDARD-CLASS)>
#<IT.BESE.UCW:STANDARD-COMPONENT-CLASS IT.BESE.UCW-USER::DOJO-TAB-
EXAMPLE>)
Locals:
CLASS = #<IT.BESE.UCW:STANDARD-COMPONENT-CLASS IT.BESE.UCW-
USER::DOJO-TAB-EXAMPLE>
CCL::INITARGS = (:DOM-ID "top-level-tab-example")
26: (CCL::%MAKE-INSTANCE '(IT.BESE.UCW-USER::DOJO-TAB-EXAMPLE .
#<IT.BESE.UCW:STANDARD-COMPONENT-CLASS IT.BESE.UCW-USER::DOJO-TAB-
EXAMPLE>))
Locals:
CCL::CLASS-CELL = (IT.BESE.UCW-USER::DOJO-TAB-EXAMPLE .
#<IT.BESE.UCW:STANDARD-COMPONENT-CLASS IT.BESE.UCW-USER::DOJO-TAB-
EXAMPLE>)
CCL::INITARGS = (:DOM-ID "top-level-tab-example")
27: (#<STANDARD-METHOD INITIALIZE-INSTANCE :AFTER (IT.BESE.UCW-
USER::EXAMPLE-WINDOW)> #<IT.BESE.UCW-USER::EXAMPLE-WINDOW #x8A593F6>)
Locals:
IT.BESE.UCW:SELF = #<VALUE-CELL #<IT.BESE.UCW-USER::EXAMPLE-
WINDOW #x8A593F6> #x8A58DE6>
#:NEXT-METHOD-CONTEXT = #<VALUE-CELL ((#(#1=#<STANDARD-
GENERIC-FUNCTION INITIALIZE-INSTANCE #x8072556> (#5=#<#> #<#> #3=#<#>
#<#> #2=#<#> #4=#<#>) (#1# #) #<Compiled-function CCL::%%CNM-WITH-
ARGS-CHECK-INITARGS #x8062886> (#2# # # #3# #4#))) #5# #<IT.BESE.UCW-
USER::EXAMPLE-WINDOW #x8A593F6> :TITLE "UCW Examples" :STYLESHEET ("/
ucw/ucw.css" "/static/examples.css") :DOM-ID "main-
splitter" :ICON ...) #x8A58DEE>
#:COMPILER-VAR = #<VALUE-CELL (NIL) #x8A58D2E>
Catch-tags:
NIL
28: (CCL::%%BEFORE-AND-AFTER-COMBINED-METHOD-DCODE '(#(#1=#<STANDARD-
GENERIC-FUNCTION INITIALIZE-INSTANCE #x8072556> (#5=#<#> #<#> #3=#<#>
#<#> #2=#<#> #4=#<#>) (#1# #) #<Compiled-function CCL::%%CNM-WITH-
ARGS-CHECK-INITARGS #x8062886> (#2# # # #3# #4#)) #5# #<IT.BESE.UCW-
USER::EXAMPLE-WINDOW #x8A593F6> :TITLE "UCW Examples" :STYLESHEET ("/
ucw/ucw.css" "/static/examples.css") :DOM-ID "main-splitter" :ICON ...))
Locals:
CCL::METHODS = ((#<STANDARD-METHOD INITIALIZE-
INSTANCE :BEFORE (IT.BESE.UCW:LIST-CONTAINER)>) (#<STANDARD-METHOD
INITIALIZE-INSTANCE :AFTER (IT.BESE.UCW:DOJO-WIDGET-COMPONENT)>
#<STANDARD-METHOD INITIALIZE-INSTANCE :AFTER (IT.BESE.UCW-
USER::EXAMPLE-WINDOW)>) #<STANDARD-METHOD INITIALIZE-INSTANCE
(IT.BESE.UCW:CONTAINER)> #<CCL::STANDARD-KERNEL-METHOD INITIALIZE-
INSTANCE (STANDARD-OBJECT)>)
CCL::BEFORES = (#<STANDARD-METHOD INITIALIZE-
INSTANCE :BEFORE (IT.BESE.UCW:LIST-CONTAINER)>)
CCL::CDR-METHS = ((#<STANDARD-METHOD INITIALIZE-
INSTANCE :AFTER (IT.BESE.UCW:DOJO-WIDGET-COMPONENT)> #<STANDARD-
METHOD INITIALIZE-INSTANCE :AFTER (IT.BESE.UCW-USER::EXAMPLE-WINDOW)
>) #<STANDARD-METHOD INITIALIZE-INSTANCE (IT.BESE.UCW:CONTAINER)>
#<CCL::STANDARD-KERNEL-METHOD INITIALIZE-INSTANCE (STANDARD-OBJECT)>)
CCL::PRIMARIES = (#<STANDARD-METHOD INITIALIZE-INSTANCE
(IT.BESE.UCW:CONTAINER)> #<CCL::STANDARD-KERNEL-METHOD INITIALIZE-
INSTANCE (STANDARD-OBJECT)>)
CCL::AFTERS = (#<STANDARD-METHOD INITIALIZE-INSTANCE :AFTER
(IT.BESE.UCW:DOJO-WIDGET-COMPONENT)> #<STANDARD-METHOD INITIALIZE-
INSTANCE :AFTER (IT.BESE.UCW-USER::EXAMPLE-WINDOW)>)
CDR = (#<CCL::STANDARD-KERNEL-METHOD INITIALIZE-INSTANCE
(STANDARD-OBJECT)>)
29: (CCL::%%CNM-WITH-ARGS-COMBINED-METHOD-DCODE '(#(#1=#<STANDARD-
GENERIC-FUNCTION INITIALIZE-INSTANCE #x8072556> (#<#> #<#> #3=#<#>
#<#> #2=#<#> #4=#<#>) (#1# #) #<Compiled-function CCL::%%CNM-WITH-
ARGS-CHECK-INITARGS #x8062886> (#2# . #5=((#<#>) (#<#> #<#>) #3#
#4#))) #5# . 4481864) #(#1=#<STANDARD-GENERIC-FUNCTION INITIALIZE-
INSTANCE #x8072556> (#5=#<STANDARD-METHOD INITIALIZE-INSTANCE :AFTER
(IT.BESE.UCW-USER::EXAMPLE-WINDOW)> #3=#<STANDARD-METHOD INITIALIZE-
INSTANCE :BEFORE (IT.BESE.UCW:LIST-CONTAINER)> #6=#<STANDARD-METHOD
INITIALIZE-INSTANCE (IT.BESE.UCW:CONTAINER)> #4=#<STANDARD-METHOD
INITIALIZE-INSTANCE :AFTER (IT.BESE.UCW:DOJO-WIDGET-COMPONENT)>
#2=#<STANDARD-METHOD INITIALIZE-INSTANCE :AROUND (IT.BESE.UCW:SIMPLE-
WINDOW-COMPONENT)> #7=#<CCL::STANDARD-KERNEL-METHOD INITIALIZE-
INSTANCE (STANDARD-OBJECT)>) (#1# (#1# #<STANDARD-GENERIC-FUNCTION
ALLOCATE-INSTANCE #x80784AE> #<STANDARD-GENERIC-FUNCTION SHARED-
INITIALIZE #x807144E>)) #<Compiled-function CCL::%%CNM-WITH-ARGS-
CHECK-INITARGS #x8062886> (#2# (#3#) (#4# #5#) #6# #7#)) #<STANDARD-
METHOD INITIALIZE-INSTANCE :AROUND (IT.BESE.UCW:SIMPLE-WINDOW-
COMPONENT)>)
Locals:
CCL::CELL-2 = (#<STANDARD-METHOD INITIALIZE-INSTANCE :AFTER
(IT.BESE.UCW-USER::EXAMPLE-WINDOW)> #<IT.BESE.UCW-USER::EXAMPLE-
WINDOW #x8A593F6> :TITLE "UCW Examples" :STYLESHEET ("/ucw/ucw.css" "/
static/examples.css") :DOM-ID "main-splitter" :ICON "/static/
favicon.ico" ...)
30: (CCL::%CALL-NEXT-METHOD-WITH-ARGS '(#(#1=#<STANDARD-GENERIC-
FUNCTION INITIALIZE-INSTANCE #x8072556> (#<#> #<#> #3=#<#> #<#>
#2=#<#> #4=#<#>) (#1# #) #<Compiled-function CCL::%%CNM-WITH-ARGS-
CHECK-INITARGS #x8062886> (#2# . #5=((#<#>) (#<#> #<#>) #3# #4#)))
#5# . 4481864))
Locals:
CCL::ARGS = (#<IT.BESE.UCW-USER::EXAMPLE-WINDOW
#x8A593F6> :TITLE "UCW Examples" :STYLESHEET ("/ucw/ucw.css" "/static/
examples.css") :DOM-ID "main-splitter" :ICON "/static/
favicon.ico" :DOJO-TYPE ...)
CCL::METHODS = ((#<STANDARD-METHOD INITIALIZE-
INSTANCE :BEFORE (IT.BESE.UCW:LIST-CONTAINER)>) (#<STANDARD-METHOD
INITIALIZE-INSTANCE :AFTER (IT.BESE.UCW:DOJO-WIDGET-COMPONENT)>
#<STANDARD-METHOD INITIALIZE-INSTANCE :AFTER (IT.BESE.UCW-
USER::EXAMPLE-WINDOW)>) #<STANDARD-METHOD INITIALIZE-INSTANCE
(IT.BESE.UCW:CONTAINER)> #<CCL::STANDARD-KERNEL-METHOD INITIALIZE-
INSTANCE (STANDARD-OBJECT)>)
31: (CCL::%%CNM-WITH-ARGS-COMBINED-METHOD-DCODE '(:TITLE "UCW
Examples" :STYLESHEET ("/ucw/ucw.css" "/static/examples.css") :DOM-ID
"main-splitter" :ICON "/static/favicon.ico" :JAVASCRIPT ((:JS
#)) ...) #<IT.BESE.UCW:STANDARD-COMPONENT-CLASS IT.BESE.UCW-
USER::EXAMPLE-WINDOW> 4481938)
Locals:
CCL::CELL-2 = (((#<STANDARD-METHOD INITIALIZE-
INSTANCE :BEFORE #>) (#<STANDARD-METHOD INITIALIZE-INSTANCE :AFTER #>
#<STANDARD-METHOD INITIALIZE-INSTANCE :AFTER #>) #<STANDARD-METHOD
INITIALIZE-INSTANCE (IT.BESE.UCW:CONTAINER)> #<CCL::STANDARD-KERNEL-
METHOD INITIALIZE-INSTANCE (STANDARD-OBJECT)>) . 4481864)
32: (CCL::%MAKE-STD-INSTANCE #<COMPILED-LEXICAL-CLOSURE #x8A596D6>
#<COMPILED-LEXICAL-CLOSURE #x8A59A36>)
Locals:
CCL::INSTANCE = #<IT.BESE.UCW-USER::EXAMPLE-WINDOW #x8A593F6>
33: (#<CCL::STANDARD-KERNEL-METHOD MAKE-INSTANCE (STANDARD-CLASS)>
#<IT.BESE.UCW:STANDARD-COMPONENT-CLASS IT.BESE.UCW-USER::EXAMPLE-
WINDOW>)
Locals:
CLASS = #<IT.BESE.UCW:STANDARD-COMPONENT-CLASS IT.BESE.UCW-
USER::EXAMPLE-WINDOW>
CCL::INITARGS = NIL
34: (#<CCL::STANDARD-KERNEL-METHOD MAKE-INSTANCE (SYMBOL)>
'IT.BESE.UCW-USER::EXAMPLE-WINDOW)
Locals:
CLASS = IT.BESE.UCW-USER::EXAMPLE-WINDOW
CCL::INITARGS = NIL
35: (#<Anonymous Function #x84FF9AE> '(IT.BESE.ARNESI::K-FOR-EVALUATE-
ARGUMENTS-THEN-APPLY #<COMPILED-LEXICAL-CLOSURE #x8A5975E> NIL (NIL)
((:LET #:G16395 . IT.BESE.UCW-USER::EXAMPLE-WINDOW) (:LET #:COMPONENT-
TYPE-16394 . IT.BESE.UCW-USER::EXAMPLE-WINDOW) (:LET #:G16393 . #)
(:LET IT.BESE.UCW:SELF) (:LEXICAL-LET #:APP-16383 # #) (:LEXICAL-LET
#:G16390 # #)) NIL) #<FREE-APPLICATION-FORM # #x89A407E> 'NIL
'(IT.BESE.UCW-USER::EXAMPLE-WINDOW))
Locals:
IT.BESE.ARNESI::K = (IT.BESE.ARNESI::K-FOR-EVALUATE-
ARGUMENTS-THEN-APPLY #<COMPILED-LEXICAL-CLOSURE #x8A5975E> NIL (NIL)
((:LET #:G16395 . IT.BESE.UCW-USER::EXAMPLE-WINDOW) (:LET #:COMPONENT-
TYPE-16394 . IT.BESE.UCW-USER::EXAMPLE-WINDOW) (:LET #:G16393 .
#<IT.BESE.UCW::HTTPD-REQUEST #x8A5CD66>) (:LET IT.BESE.UCW:SELF)
(:LEXICAL-LET #:APP-16383 #<COMPILED-LEXICAL-CLOSURE #x8A59C6E>
#<COMPILED-LEXICAL-CLOSURE #x8A59C56>) (:LEXICAL-LET #:G16390
#<COMPILED-LEXICAL-CLOSURE #x8A59C1E> #<COMPILED-LEXICAL-CLOSURE
#x8A59C06>)) NIL)
IT.BESE.ARNESI:FUNC = #<FREE-APPLICATION-FORM # #x89A407E>
IT.BESE.ARNESI::DYN-ENV = NIL
IT.BESE.ARNESI:ARGUMENTS = (IT.BESE.UCW-USER::EXAMPLE-WINDOW)
IT.BESE.ARNESI::VARS = NIL
IT.BESE.ARNESI::VALS = NIL
Catch-tags:
NIL
36: (IT.BESE.ARNESI::DRIVE-INTERPRETER/CC '(NIL #<STANDARD-METHOD
IT.BESE.UCW::HANDLE-ACTION-IN-SESSION (IT.BESE.UCW:STANDARD-
APPLICATION T T T)> . 4481938))
Locals:
Catch-tags:
IT.BESE.ARNESI::DONE
37: (#<STANDARD-METHOD IT.BESE.UCW::HANDLE-ACTION-IN-SESSION
(IT.BESE.UCW:STANDARD-APPLICATION T T T)> #<EXAMPLE-APPLICATION "/"
#x89A73D6> #<#<STANDARD-CLASS EXAMPLE-APPLICATION-SESSION> 1
#<STANDARD-SESSION-FRAME _BLtsNNmvjLiEjrNmpnAZ 0/0/30 #x8A5A376>
#x8A5B096> 'NIL #S(IT.BESE.UCW::ACTION-ENTRY :LAMBDA #<COMPILED-
LEXICAL-CLOSURE #x89A362E> :VALID-P T :ISOLATED-P NIL :INVOCATION-
ISOLATED-P NIL :INVOCATION-IDS ...))
Locals:
IT.BESE.UCW::APPLICATION = #<EXAMPLE-APPLICATION "/" #x89A73D6>
IT.BESE.UCW::SESSION = #<#<STANDARD-CLASS EXAMPLE-
APPLICATION-SESSION> 1 #<STANDARD-SESSION-FRAME _BLtsNNmvjLiEjrNmpnAZ
0/0/30 #x8A5A376> #x8A5B096>
IT.BESE.UCW::FRAME = NIL
IT.BESE.UCW::ACTION = #S(IT.BESE.UCW::ACTION-ENTRY :LAMBDA
#<COMPILED-LEXICAL-CLOSURE #x89A362E> :VALID-P T :ISOLATED-P
NIL :INVOCATION-ISOLATED-P NIL :INVOCATION-IDS ...)
IT.BESE.UCW::CALL-CALLBACKS-P = NIL
IT.BESE.UCW::CALLBACKS-CALLED = NIL
IT.BESE.UCW::RENDER-LOOP-CALLED = NIL
IT.BESE.UCW::ACTION-INVOCATION-ID = NIL
#:COMPILER-VAR = (NIL)
#:G12999 = (ERROR #<COMPILED-LEXICAL-CLOSURE #x8A59C86>)
CCL::%HANDLERS% = ((ERROR #<COMPILED-LEXICAL-CLOSURE
#x8A5C616>) (STREAM-ERROR #<COMPILED-LEXICAL-CLOSURE #x8A5CDA6> ERROR
#<COMPILED-LEXICAL-CLOSURE IT.BESE.UCW::ABORT-WORKER #x8A5CDBE>)
(PROCESS-RESET))
Catch-tags:
NIL
38: (CCL::%CALL-NEXT-METHOD '(NIL #<STANDARD-METHOD
IT.BESE.UCW::HANDLE-ACTION-IN-SESSION (IT.BESE.UCW:STANDARD-
APPLICATION T T T)> . 4481938))
Locals:
CCL::ARGS = NIL
CDR = NIL
METHOD-FUNCTION = #<METHOD-FUNCTION IT.BESE.UCW::HANDLE-
ACTION-IN-SESSION (IT.BESE.UCW:STANDARD-APPLICATION T T T)>
Catch-tags:
NIL
39: (#<STANDARD-METHOD IT.BESE.UCW::HANDLE-ACTION-IN-SESSION :AROUND
(IT.BESE.UCW:STANDARD-APPLICATION T T T)> #<EXAMPLE-APPLICATION "/"
#x89A73D6> #<#<STANDARD-CLASS EXAMPLE-APPLICATION-SESSION> 1
#<STANDARD-SESSION-FRAME _BLtsNNmvjLiEjrNmpnAZ 0/0/30 #x8A5A376>
#x8A5B096> 'NIL #S(IT.BESE.UCW::ACTION-ENTRY :LAMBDA #<COMPILED-
LEXICAL-CLOSURE #x89A362E> :VALID-P T :ISOLATED-P NIL :INVOCATION-
ISOLATED-P NIL :INVOCATION-IDS ...))
Locals:
IT.BESE.UCW::APPLICATION = #<EXAMPLE-APPLICATION "/" #x89A73D6>
IT.BESE.UCW::SESSION = #<#<STANDARD-CLASS EXAMPLE-
APPLICATION-SESSION> 1 #<STANDARD-SESSION-FRAME _BLtsNNmvjLiEjrNmpnAZ
0/0/30 #x8A5A376> #x8A5B096>
IT.BESE.UCW::FRAME = NIL
IT.BESE.UCW::ACTION = #S(IT.BESE.UCW::ACTION-ENTRY :LAMBDA
#<COMPILED-LEXICAL-CLOSURE #x89A362E> :VALID-P T :ISOLATED-P
NIL :INVOCATION-ISOLATED-P NIL :INVOCATION-IDS ...)
#:NEXT-METHOD-CONTEXT = (NIL #<STANDARD-METHOD
IT.BESE.UCW::HANDLE-ACTION-IN-SESSION (IT.BESE.UCW:STANDARD-
APPLICATION T T T)> . 4481938)
#:G12993 = #<A Mac Pointer #x3045C0>
#:G12994 = #<LOCK-ACQUISITION [status = T] #x11A9A3E>
Catch-tags:
NIL
40: (CCL::%%STANDARD-COMBINED-METHOD-DCODE '(T "" #("")) #<REGEXP-
DISPATCHER ^(index.ucw|)$ #x89A3606>)
Locals:
CCL::CELL-2 = (#<STANDARD-METHOD IT.BESE.UCW::HANDLE-ACTION-
IN-SESSION (IT.BESE.UCW:STANDARD-APPLICATION T T T)> . 4481938)
#:G22534 = #<METHOD-FUNCTION IT.BESE.UCW::HANDLE-ACTION-IN-
SESSION :AROUND (IT.BESE.UCW:STANDARD-APPLICATION T T T)>
41: (#<STANDARD-METHOD IT.BESE.UCW::DISPATCH (IT.BESE.UCW::ABSTRACT-
DISPATCHER IT.BESE.UCW:STANDARD-APPLICATION IT.BESE.UCW::STANDARD-
REQUEST-CONTEXT)> '(#<URL-DISPATCHER "error.ucw" #x89BAC3E> #<URL-
DISPATCHER "error-render.ucw" #x89C4616>) #<REGEXP-DISPATCHER ^
(index.ucw|)$ #x89A3606> #<EXAMPLE-APPLICATION "/" #x89A73D6>)
Locals:
42: (#<STANDARD-METHOD IT.BESE.UCW::SERVICE (IT.BESE.UCW:STANDARD-
APPLICATION IT.BESE.UCW::REQUEST-CONTEXT)> #<EXAMPLE-APPLICATION "/"
#x89A73D6> 'IT.BESE.ARNESI:GET-LOGGER)
Locals:
43: (#<STANDARD-METHOD IT.BESE.UCW::HANDLE-REQUEST
(IT.BESE.UCW:STANDARD-SERVER IT.BESE.UCW:REQUEST IT.BESE.UCW:RESPONSE)
> #<STANDARD-SERVER IT.BESE.UCW:MULTITHREAD-HTTPD-BACKEND 4
#x89FC596> 'NIL #<BOGUS object @ #x11A9C46>)
Locals:
IT.BESE.UCW::SERVER = #<STANDARD-SERVER
IT.BESE.UCW:MULTITHREAD-HTTPD-BACKEND 4 #x89FC596>
IT.BESE.UCW::HANDLED = #<VALUE-CELL NIL #x8A5C6E6>
#:TRY-AGAIN = #<RESTART IT.BESE.UCW::TRY-AGAIN #x11A9C3E>
#:FAIL-MISERABLY = #<RESTART IT.BESE.UCW::FAIL-MISERABLY
#x11A9C16>
#:G13732 = (#<RESTART IT.BESE.UCW::FAIL-MISERABLY #x11A9C16>
#<RESTART IT.BESE.UCW::TRY-AGAIN #x11A9C3E>)
CCL::%RESTARTS% = ((#<RESTART ABORT-BREAK #x11A9DF6>
#<RESTART ABORT #x11A9E1E>))
SWANK::*SLDB-QUIT-RESTART* = SWANK::ABORT-REQUEST
IT.BESE.UCW:*CONTEXT* = :UNBOUND
#:G13735 = (ERROR #<COMPILED-LEXICAL-CLOSURE #x8A5C616>)
CCL::%HANDLERS% = ((STREAM-ERROR #<COMPILED-LEXICAL-CLOSURE
#x8A5CDA6> ERROR #<COMPILED-LEXICAL-CLOSURE IT.BESE.UCW::ABORT-WORKER
#x8A5CDBE>) (PROCESS-RESET))
#:GENERATE-BACKTRACE-FOR-EMACS = #<RESTART
IT.BESE.UCW::GENERATE-BACKTRACE-FOR-EMACS #x11A9B0E>
#:SERVER-ERROR = #<RESTART IT.BESE.UCW::SERVER-ERROR #x11A9AE6>
CCL::%RESTARTS% = ((#<RESTART IT.BESE.UCW::FAIL-MISERABLY
#x11A9C16> #<RESTART IT.BESE.UCW::TRY-AGAIN #x11A9C3E>) (#<RESTART
ABORT-BREAK #x11A9DF6> #<RESTART ABORT #x11A9E1E>))
IT.BESE.YACLML:*YACLML-STREAM* = T
Catch-tags:
(:RESTART IT.BESE.UCW::SERVER-ERROR)
IT.BESE.UCW::ABORT-REQUEST
(:RESTART IT.BESE.UCW::FAIL-MISERABLY)
44: (#<STANDARD-METHOD IT.BESE.UCW::HANDLE-REQUEST (IT.BESE.UCW:HTTPD-
BACKEND IT.BESE.UCW::HTTPD-REQUEST IT.BESE.UCW::HTTPD-RESPONSE)>
#<IT.BESE.UCW:MULTITHREAD-HTTPD-BACKEND #x8A39786>
'(IT.BESE.UCW::CONNECTION #<IT.BESE.UCW:MULTITHREAD-HTTPD-BACKEND
#x8A39786> #<IT.BESE.UCW::PENDING-REQUEST #x8A575BE>)
#<IT.BESE.UCW:MULTITHREAD-HTTPD-BACKEND #x8A39786>)
Locals:
IT.BESE.UCW::BACKEND = #<IT.BESE.UCW:MULTITHREAD-HTTPD-
BACKEND #x8A39786>
45: (IT.BESE.UCW::HTTPD-WORKER-LOOP/HANDLE #<IT.BESE.UCW::HTTPD-
WORKER #x8A42C0E> #<IT.BESE.UCW:MULTITHREAD-HTTPD-BACKEND #x8A39786>
#<IT.BESE.UCW::PENDING-REQUEST #x8A575BE>)
Locals:
IT.BESE.UCW::WORKER = #<IT.BESE.UCW::HTTPD-WORKER #x8A42C0E>
IT.BESE.UCW::BACKEND = #<IT.BESE.UCW:MULTITHREAD-HTTPD-
BACKEND #x8A39786>
IT.BESE.UCW::PENDING-REQUEST = #<IT.BESE.UCW::PENDING-
REQUEST #x8A575BE>
#:COMPILER-VAR = (NIL)
STREAM = #<TCP-STREAM (SOCKET/7) #x8A57726>
#:ABORT-WORKER = #<COMPILED-LEXICAL-CLOSURE
IT.BESE.UCW::ABORT-WORKER #x8A5CDBE>
#:G17605 = (STREAM-ERROR #<COMPILED-LEXICAL-CLOSURE
#x8A5CDA6> ERROR #<COMPILED-LEXICAL-CLOSURE IT.BESE.UCW::ABORT-WORKER
#x8A5CDBE>)
CCL::%HANDLERS% = ((PROCESS-RESET))
IT.BESE.UCW:REQUEST = #<IT.BESE.UCW::HTTPD-REQUEST #x8A5CD66>
IT.BESE.UCW:RESPONSE = #<IT.BESE.UCW::HTTPD-RESPONSE #x8A5C9AE>
Catch-tags:
IT.BESE.UCW::ABORT-BACKEND-REQUEST
NIL
NIL
46: (IT.BESE.UCW::HTTPD-WORKER-LOOP '(#<RESTART ABORT-BREAK
#x11A9DF6> #<RESTART ABORT #x11A9E1E>))
Locals:
#:BINDS-17624 = NIL
47: (CCL::RUN-PROCESS-INITIAL-FORM '(#<COMPILED-LEXICAL-CLOSURE
#x8A4296E>) #<PROCESS an httpd worker 0(3) [Active] #x8A429A6>)
Locals:
CCL::INITIAL-FORM = (#<COMPILED-LEXICAL-CLOSURE #x8A4296E>)
CCL::EXITED = NIL
#:G51 = (PROCESS-RESET)
CCL::%HANDLERS% = NIL
#:ABORT = #<RESTART ABORT #x11A9E1E>
CCL::%RESTARTS% = NIL
Catch-tags:
(:RESTART ABORT-BREAK)
NIL
48: (#<Anonymous Function #x80DB61E> '(#<COMPILED-LEXICAL-CLOSURE
#x8A4296E>) 0)
Locals:
CCL::INITIAL-FORM = (#<COMPILED-LEXICAL-CLOSURE #x8A4296E>)
*CURRENT-PROCESS* = #<PROCESS Initial(0) [Active] #x80DC106>
CCL::SYMS = (CCL::*FREE-XPS* CCL::*FREE-CIRCULARITY-HASH-
TABLES* CCL::*OPERAND-VECTOR-FREELIST* CCL::*LAP-INSTRUCTION-
FREELIST* CCL::*LAP-LABEL-FREELIST* CCL::*VINSN-VARPARTS* CCL::*VINSN-
LABEL-FREELIST* CCL::*VINSN-FREELIST* CCL::*LCELL-FREELIST*
CCL::*LREG-FREELIST* ...)
VALUES = (NIL NIL #<POOL #x8A4424E> #<POOL #x8A44236>
#<POOL #x8A4421E> #<POOL #x8A44206> #<POOL #x8A441EE> #<POOL
#x8A441D6> #<POOL #x8A441BE> #<POOL #x8A441A6> ...)
Catch-tags:
NIL
49: (#<Anonymous Function #x80CE806> 788960 #<LISP-THREAD an httpd
worker 0 [tcr @ #x302780] #x8A42A96>)
Locals:
CCL::TCR = 788960
CCL::THREAD = #<LISP-THREAD an httpd worker 0 [tcr @
#x302780] #x8A42A96>
CCL::*CURRENT-LISP-THREAD* = #<LISP-THREAD Initial [tcr @
#x300390] #x80CEAB6>
CCL::INITIAL-FUNCTION = (#<Anonymous Function #x80DB61E>
#<PROCESS an httpd worker 0(3) [Active] #x8A429A6> (#<COMPILED-
LEXICAL-CLOSURE #x8A4296E>))
On Oct 22, 2006, at 11:50 AM, Attila Lendvai wrote:
> 09:53 UCW.BACKEND/+INFO+: Handling request from NIL for "/"
> 09:53 UCW-LOGGER/+ERROR+: Handling action error #<CCL::SIMPLE-PROGRAM-
> ERROR #x8C3AFC6>.
> 09:53 UCW-LOGGER/+ERROR+: Error #<CCL::SIMPLE-PROGRAM-ERROR
> #x8C3AFC6> while serving action.
>
>
> i've pushed a small patch that will use ~A to log conditions, so we
> will see more.
>
>
> 09:53 UCW-LOGGER/+INFO+: Not debugging.
>
>
> this is because you are not running ucw from slime. if you are
> planning to play more with ucw i suggest to set up stuff to start
> it from within slime and then the debugger will come up with this
> error with much more freedom to look around.
>
> While on the browser, it shows a backtrace:
>
> ERROR
>
> Required arguments in #< IT.BESE.UCW:DOJO-TAB #x8C34A1E> don't match
> lambda list (IT.BESE.UCW::KEY . IT.BESE.UCW::COMP).
>
> this is really wierd.
>
> let's see the log with the ~A's and try to run ucw from slime and
> see what the debugger helps.
>
> --
> - attila
>
> "- The truth is that I've been too considerate, and so became
> unintentionally cruel...
> - I understand.
> - No, you don't understand! We don't speak the same language!"
> (Ingmar Bergman - Smultronstället)
More information about the bese-devel
mailing list