[cells-devel] Celtk: Any :state slot brings up error ... ?!

[Frank Goenninger]

Ah - no, it's not caused by 'disbled being written incorrectly (I  
just saw this - sorry).

Frank

Am 23.11.2007 um 20:06 schrieb Frank Goenninger:

> * PGP Signed: 11/23/07 at 20:06:41
>
> Hi again:
>
> I have my entry widget as posted before:
>
> (mk-button-ex ("Change!"
>                    (let* ((pmutil-gui (fm^ :pmutil-gui))
>                           (pm (selected-pm pmutil-gui)))
>                      (when pm
>                        (let ((callsign (fm^v :callsign-entry)))
>                          (set-status pmutil-gui +PMUTIL-GUI-STATUS- 
> SETTING-CALLSIGN-IN-PM+)
>                          (setf (new-callsign pmutil-gui)
>                                (subseq callsign
>                                        0
>                                        (min (length callsign)
>                                              
> +PMIO_MAX_CALLSIGN_LENGTH+)
>                                        ))
>                          (set-status pmutil-gui +PMUTIL-GUI-STATUS- 
> READY+)))))
>                   :id :callsign-entry-btn
> ;;                   :state (c? (if (pm-selected-p (fm^ :pmutil- 
> gui))       <--- My intended functionality
> ;;                                  'enabled
> ;;                                  'disbled))
>                   :state (c? (if  
> 1                                                                   
> <-- Simple test
>                                  'enabled
>                                  'disbled))
>                   :background (c? (background .parent))
>                   :parent-x 589
>                   :parent-y 320
>                   :tile? nil)
>
> As soon as I put the :state part in I get the following error:
>
> the assertion (NOT (CFFI-SYS:NULL-POINTER-P CTK::SELF-TKWIN)) failed.
>    [Condition of type SIMPLE-ERROR]
>
> I wasn't able to get a real trace/debug approach to this one ... I  
> assume this has to do with the order of widget creation. I am sure  
> I have used this before, so I haven't a clue what's wrong there. Oh  
> my ... ?!
>
> Any help really appreciated...
>
> Frank
>
> * Frank Goenninger<frgo at mac.com>
> * 0xED320F02:0x05AE0907
> _______________________________________________
> cells-devel site list
> cells-devel at common-lisp.net
> http://common-lisp.net/mailman/listinfo/cells-devel
>
>
> * PGP Signed: 11/23/07 at 20:06:41
> * text/plain body
> * Frank Goenninger<frgo at mac.com>
> * 0xED320F02:0x05AE0907

-------------- next part --------------
A non-text attachment was scrubbed...
Name: PGP.sig
Type: application/pgp-signature
Size: 833 bytes
Desc: not available
URL: <https://mailman.common-lisp.net/pipermail/cells-devel/attachments/20071123/dad6f03a/attachment.sig>