"Leslie P. Polzer" <[email protected]> writes:
> What is the error?
Ups! Sorry, I forgt to attach it.
Bye,
Andrea.
--
Software vuol dire conoscenza! Per questo dev'essere un bene comune!
Usa software libero e contribisci a cambiare il mondo:
http://www.softwarelibero.it
http://www.fsf.org
http://www.gnu.org
The assertion (= (LENGTH SB-C::VARS) (LENGTH SB-C::ARGS)) failed.
[Condition of type SIMPLE-ERROR]
Restarts:
0: [CONTINUE] Retry assertion.
1: [TRY-RECOMPILING] Try recompiling operations-action
2: [RETRY] Retry compiling #<CL-SOURCE-FILE "weblocks" "src" "widgets"
"dataseq" "operations-action">.
3: [ACCEPT] Continue, treating compiling #<CL-SOURCE-FILE "weblocks" "src"
"widgets" "dataseq" "operations-action"> as having been successful.
4: [ABORT] Abort compilation.
5: [*ABORT] Return to SLIME's top level.
--more--
Backtrace:
0: (SB-KERNEL:ASSERT-ERROR (= (LENGTH SB-C::VARS) (LENGTH SB-C::ARGS)) NIL
NIL)
1: (SB-C::TRIVIAL-LAMBDA-VAR-REF-LVAR #<SB-C::REF :%SOURCE-NAME #:G[G295]690
:LEAF # {B131F81}>)
2: (SB-C::USE-GOOD-FOR-DX-P #<SB-C::REF :%SOURCE-NAME #:G[G295]690 :LEAF #
{B131F81}> :ALWAYS-DYNAMIC #<SB-C:COMPONENT :NAME (SB-C::XEP #) {B3A8D39}>)
3: (SB-C::RECHECK-DYNAMIC-EXTENT-LVARS #<SB-C:COMPONENT :NAME (SB-C::XEP #)
{B3A8D39}>)
4: (SB-C::PHYSENV-ANALYZE #<SB-C:COMPONENT :NAME (SB-C::XEP #) {B3A8D39}>)
5: (SB-C::COMPILE-COMPONENT #<SB-C:COMPONENT :NAME (SB-C::XEP #) {B3A8D39}>)
6: (SB-C::%COMPILE ..)
7: (SB-C::FOPCOMPILE-FUNCTION ..)
8: (SB-C::FOPCOMPILE ..)
9: (SB-C::FOPCOMPILE ..)
10: (SB-C::CONVERT-AND-MAYBE-COMPILE ..)
11: ((FLET SB-C::DEFAULT-PROCESSOR) (SB-KERNEL:%SET-FDEFINITION
'WEBLOCKS::DATASEQ-OPERATIONS-ACTION (CL-CONT::MAKE-FUNCALLABLE (LAMBDA # # #
#))))
12: (SB-C::PROCESS-TOPLEVEL-FORM ..)
13: ((FLET SB-C::DEFAULT-PROCESSOR) (SETF (FDEFINITION
'WEBLOCKS::DATASEQ-OPERATIONS-ACTION) (CL-CONT::MAKE-FUNCALLABLE #)))
14: (SB-C::PROCESS-TOPLEVEL-FORM ..)
15: (SB-C::PROCESS-TOPLEVEL-PROGN ..)
16: (SB-C::PROCESS-TOPLEVEL-FORM ..)
17: ((FLET SB-C::DEFAULT-PROCESSOR) ..)
18: (SB-C::PROCESS-TOPLEVEL-FORM ..)
19: ((FLET SB-C::DEFAULT-PROCESSOR) ..)
20: (SB-C::PROCESS-TOPLEVEL-FORM ..)
21: (SB-C::SUB-SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >)
22: ((LAMBDA ()))
23: ((FLET SB-C::WITH-IT))
24: (SB-C::SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >)
25: (COMPILE-FILE ..)
26: (ASDF:COMPILE-FILE* ..)
27: ((SB-PCL::FAST-METHOD ASDF:PERFORM (ASDF:COMPILE-OP ASDF:CL-SOURCE-FILE))
..)
28: ((SB-PCL::EMF ASDF:PERFORM) #<unavailable argument> #<unavailable
argument> #<ASDF:COMPILE-OP NIL {B6313A9}> #<ASDF:CL-SOURCE-FILE "weblocks"
"src" "widgets" "dataseq" "operations-action">)
29: ((SB-PCL::FAST-METHOD ASDF::PERFORM-WITH-RESTARTS (ASDF:COMPILE-OP
ASDF:CL-SOURCE-FILE)) ..)
30: ((LAMBDA ()))
31: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK))
32: ((FLET #:WITHOUT-INTERRUPTS-BODY-[CALL-WITH-RECURSIVE-LOCK]325))
33: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET
SB-THREAD::WITH-RECURSIVE-LOCK-THUNK) {B567C745}> #<SB-THREAD:MUTEX "World
Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {BC37339}>>)
34: ((FLET SB-C::WITH-IT))
35: ((SB-PCL::FAST-METHOD ASDF::PERFORM-PLAN (LIST)) ..)
36: ((LAMBDA ()))
37: (ASDF::CALL-WITH-SYSTEM-DEFINITIONS #<CLOSURE (LAMBDA #) {C000AED}>)
38: ((SB-PCL::FAST-METHOD ASDF:OPERATE (T T)) #<unused argument> #<unused
argument> ASDF:LOAD-OP "weblocks")
39: ((SB-PCL::EMF ASDF:OPERATE) #<unused argument> #<unused argument>
ASDF:LOAD-OP "weblocks")
40: ((LAMBDA ()))
41: ((FLET SWANK-BACKEND:CALL-WITH-COMPILATION-HOOKS) #<CLOSURE (LAMBDA #)
{C000AAD}>)
42: (SWANK::OPERATE-ON-SYSTEM "weblocks" SWANK-IO-PACKAGE::LOAD-OP)
43: ((LAMBDA ()))
44: (SWANK::MEASURE-TIME-INTERVAL #<CLOSURE (LAMBDA #) {C000A45}>)
45: (SWANK::COLLECT-NOTES #<CLOSURE (LAMBDA #) {C000A2D}>)
46: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SWANK:OPERATE-ON-SYSTEM-FOR-EMACS
"weblocks" (QUOTE SWANK-IO-PACKAGE::LOAD-OP)) #<NULL-LEXENV>)
47: (EVAL (SWANK:OPERATE-ON-SYSTEM-FOR-EMACS "weblocks" (QUOTE
SWANK-IO-PACKAGE::LOAD-OP)))
48: (SWANK:EVAL-FOR-EMACS (SWANK:OPERATE-ON-SYSTEM-FOR-EMACS "weblocks"
'SWANK-IO-PACKAGE::LOAD-OP) "COMMON-LISP-USER" 6)
49: (SWANK::PROCESS-REQUESTS NIL)
50: ((LAMBDA ()))
51: ((LAMBDA ()))
52: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK>
#<CLOSURE (LAMBDA #) {BC3901D}>)
53: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK) #<FUNCTION
SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA #) {BC3901D}>)
54: (SWANK::CALL-WITH-BINDINGS ((*STANDARD-OUTPUT* . #) (*STANDARD-INPUT* . #)
(*TRACE-OUTPUT* . #) (*ERROR-OUTPUT* . #) (*DEBUG-IO* . #) (*QUERY-IO* . #)
...) #<CLOSURE (LAMBDA #) {BC3902D}>)
55: (SWANK::HANDLE-REQUESTS #<SWANK::CONNECTION {B726149}> NIL)
56: ((FLET #:WITHOUT-INTERRUPTS-BODY-[BLOCK407]412))
57: ((FLET SB-THREAD::WITH-MUTEX-THUNK))
58: ((FLET #:WITHOUT-INTERRUPTS-BODY-[CALL-WITH-MUTEX]301))
59: (SB-THREAD::CALL-WITH-MUTEX ..)
--more--
--
You received this message because you are subscribed to the Google Groups
"weblocks" group.
To post to this group, send email to [email protected].
To unsubscribe from this group, send email to
[email protected].
For more options, visit this group at
http://groups.google.com/group/weblocks?hl=en.
