[mcclim-devel] error on modifying example code

Jason Wang randomtalk at gmail.com
Sat Apr 16 20:20:52 UTC 2005


hi, i just got McClim and see how it works.. and got my first attempt
in modifying the example code(s) in trying to get a feel how
everything works.. though, what seem to be a simple layout edition
turned out crashing my program upon start up (note, the example
program calculator is working fine before modification).. i modified
the following code snippet:
(:layouts
   (default
       (with-slots (text-field) *application-frame*
         (vertically (:width 150 :max-width 500)
           (setf text-field screen)
           (horizontally (:height 50) ac ce)
           (tabling (:grid t)
             (list one two three four)
             (list five six seven eight)
             (list nine zero plus dash)
             (list multiply divide result))))))
  (:top-level (calculator-frame-top-level . nil)))

the fifth last line to second last line would be the lines of
interest.. i just modified some layout component (or i thought to be),
and it gave me the following error:
There is no applicable method for the generic function
  #<STANDARD-GENERIC-FUNCTION CLIM:MOVE-SHEET (2)>
when called with arguments
  (NIL 69 99).
   [Condition of type SIMPLE-ERROR]

Backtrace:
  0: ((SB-PCL::FAST-METHOD NO-APPLICABLE-METHOD (T)) #<unavailable
argument> #<unavailable argument> #<STANDARD-GENERIC-FUNCTION
CLIM:MOVE-SHEET (2)> (NIL 69 99))
  1: ((SB-PCL::FAST-METHOD NO-APPLICABLE-METHOD (T)) #<unavailable
argument> #<unavailable argument> #<STANDARD-GENERIC-FUNCTION
CLIM:MOVE-SHEET (2)> (NIL 69 99))
  2: ((SB-PCL::FAST-METHOD CLIM:ALLOCATE-SPACE (CLIM:GRID-PANE T T))
(#(NIL 37) . #()) #<unavailable argument> #<CLIM:GRID-PANE "(Unnamed
Pane)" {9D40E49}> 92 132)
  3: ((SB-PCL::FAST-METHOD
CLIM-INTERNALS::BOX-LAYOUT-MIXIN/VERTICALLY-ALLOCATE-SPACE
(CLIM-INTERNALS::BOX-LAYOUT-MIXIN T T)) (#(NIL 32) . #())
#<unavailable argument> #<CLIM:VRACK-PANE "(Unnamed Pane)" {9D49159}>
92 186)
  4: ((SB-PCL::FAST-METHOD
CLIM-INTERNALS::BOX-LAYOUT-MIXIN/VERTICALLY-ALLOCATE-SPACE
(CLIM-INTERNALS::BOX-LAYOUT-MIXIN T T)) (#(NIL 32) . #())
#<unavailable argument> #<CLIM:VRACK-PANE "(Unnamed Pane)" {9D50D69}>
92 190)
  5: ((LAMBDA (SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL.
SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2.)) #<unavailable argument>
#<unavailable argument> #<CLIM-INTERNALS::TOP-LEVEL-SHEET-PANE
CLIM-INTERNALS::TOP-LEVEL-SHEET {A305B91}> 92 190)
  6: ((LAMBDA (SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL.
SB-PCL::.ARG0. SB-PCL::.ARG1.)) #<unavailable argument> #<unavailable
argument> #<CLIM-CLX::CLX-FRAME-MANAGER {9A226E9}>
#<CLIM-DEMO::CALCULATOR {A35C971}>)
  7: ((SB-PCL::FAST-METHOD CLIM:ADOPT-FRAME (CLIM:FRAME-MANAGER
CLIM:APPLICATION-FRAME)) (#(NIL 1 15 12) . #()) #<unavailable
argument> #<CLIM-CLX::CLX-FRAME-MANAGER {9A226E9}>
#<CLIM-DEMO::CALCULATOR {A35C971}>)
  8: ((LAMBDA (SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL.
SB-PCL::.ARG0. SB-PCL::.ARG1.)) #<unavailable argument> #<unavailable
argument> #<CLIM-CLX::CLX-FRAME-MANAGER {9A226E9}>
#<CLIM-DEMO::CALCULATOR {A35C971}>)
  9: ((SB-PCL::FAST-METHOD CLIM:RUN-FRAME-TOP-LEVEL :AROUND
(CLIM:APPLICATION-FRAME)) #<unavailable argument>
#S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD
CLIM:RUN-FRAME-TOP-LEVEL #)> :PV-CELL NIL :NEXT-METHOD-CALL NIL
:ARG-INFO (1 . T)) #<CLIM-DEMO::CALCULATOR {A35C971}> NIL)
 10: (CLIM-DEMO::CALCULATOR)
 11: (SB-INT:EVAL-IN-LEXENV (CLIM-DEMO::CALCULATOR) #<NULL-LEXENV>)
 12: (SWANK::EVAL-REGION "(clim-demo::calculator)
" T)
 13: ((LAMBDA NIL))
 14: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-SYNTAX-HOOKS (T))
#<unused argument> #<unused argument> #<CLOSURE (LAMBDA NIL)
{A35C0B5}>)
 15: (SWANK:LISTENER-EVAL "(clim-demo::calculator)
")
 16: (SB-INT:EVAL-IN-LEXENV (SWANK:LISTENER-EVAL "(clim-demo::calculator)
") #<NULL-LEXENV>)
 17: ((LAMBDA NIL))
 18: ((SB-PCL::FAST-METHOD SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK (T
T)) #<unused argument> #<unused argument> #<FUNCTION
SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL) {A35BF25}>)
 19: ((LAMBDA NIL))
 20: (SWANK::CALL-WITH-REDIRECTED-IO #<SWANK::CONNECTION {A4ACDA1}>
#<FUNCTION (LAMBDA NIL) {B45C885}>)
 21: (SWANK::HANDLE-REQUEST #<SWANK::CONNECTION {A4ACDA1}>)
 22: ((LAMBDA NIL))
 23: ((LAMBDA NIL))
 24: (SWANK::CALL-WITH-REDIRECTED-IO #<SWANK::CONNECTION {A4ACDA1}>
#<CLOSURE (LAMBDA NIL) {9070075}>)
 25: (SWANK::REPL-LOOP #<SWANK::CONNECTION {A4ACDA1}>)
 26: (SWANK::CALL-WITH-BINDINGS NIL #<CLOSURE (LAMBDA NIL) {9070055}>)
 27: ((LAMBDA NIL))
 28: ("foreign function: call_into_lisp")
 29: ("foreign function: funcall0")

anyone know what's wrong? thanks alot :D
-- 
www.programer.name - my own personal blog : )



More information about the mcclim-devel mailing list