<div><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">21: (CCL::DO-IT '((NIL) (#<STANDARD-METHOD NIL NIL>) #<IT.BESE.UCW-<br>USER::EXAMPLE-WINDOW #x8C4852E>) '((NIL) (#<STANDARD-METHOD NIL NIL>)
<br>#<IT.BESE.UCW-USER::EXAMPLE-WINDOW #x8C4852E>) 'NIL)<br>       Locals:<br>         CCL::MAGIC = ((NIL) (#<STANDARD-METHOD NIL NIL>)<br>#<IT.BESE.UCW-USER::EXAMPLE-WINDOW #x8C4852E>)<br>         CCL::ARGS-LEN = 1
<br>22: (CCL::%%CNM-WITH-ARGS-COMBINED-METHOD-DCODE '((NIL) (#<STANDARD-<br>METHOD NIL NIL>) #<IT.BESE.UCW-USER::EXAMPLE-WINDOW #x8C4852E>) 'NIL<br>#<IT.BESE.UCW-USER::EXAMPLE-WINDOW #x8C4852E>)<br>       Locals:
<br>23: (CCL::%CALL-NEXT-METHOD-WITH-ARGS '((NIL) (#<STANDARD-METHOD NIL<br>NIL>) #<IT.BESE.UCW-USER::EXAMPLE-WINDOW #x8C4852E>))<br>       Locals:<br>         CCL::ARGS = (#<IT.BESE.UCW-USER::EXAMPLE-WINDOW
 #x8C4852E>)<br>         CCL::METHODS = (#<STANDARD-METHOD NIL NIL>)</blockquote><div><br>this one looks strange. in the code i'm passing along the #'call-next-method of (render ((x widget-component))) and later from a different method i (funcall it). maybe openmcl has some problem with this...
<br><br>i've have no access to an openmcl, so you're more or less on own with this, unless someone else with more experience and access to openmcl could take a look.<br></div><br>you could also look around yourself. the interesting pieces are around render-widget-wrapper in 
widget.lisp, and the render-widget-wrapper in examples.lisp.<br></div><br>or use sbcl if that is an option.<br><br>-- <br>- attila<br><br>"- The truth is that I've been too considerate, and so became unintentionally cruel...
<br> - I understand.<br> - No, you don't understand! We don't speak the same language!"<br>(Ingmar Bergman - Smultronstället)