|
From: Stas B. <sta...@gm...> - 2023-09-19 01:07:08
|
If you were using slime it would've highlighted the right form. On Tue, Sep 19, 2023 at 4:00 AM Jacek Podkanski via Sbcl-help < sbc...@li...> wrote: > I found the correct way to ignore the variables. What tripped me was > trying to ignore the same variables twice, in the multiple value bind and > at the top of the function. Sorry for the confusion. > > (defun draw-objects (w h) ; view > ;; trying to ignore xb and yb here as well was the source of confusion > (format t ">>>>>>>> in draw-objects ~S " cairo:*context*) > (let ((cnt (format nil "~S" *selection*)) > (tw 0) > (th 0) > (tpx 0) > (tpy 0)) > (cairo:set-source-rgb 0 0 0) > (cairo:select-font-face "Ubuntu Mono" :normal :bold) > (cairo:set-font-size 20) > > (multiple-value-bind (xb yb width height) > (cairo:text-extents *selection*) > (declare (ignore xb yb)) > > On Tue, 19 Sept 2023 at 00:10, Jacek Podkanski <rub...@go...> > wrote: > >> (multiple-value-bind (xb yb width height) >> (cairo:text-extents *selection*) >> ;; (declare (ignore xb yb)) >> (setf >> tw width >> th height)) >> >> I am trying to find the size of text drawn to cairo canvas. >> >> I need help understanding the error messages when I try to ignore xb and >> by. >> >> Trying the versions with declare form live and commented out does not >> give me any idea of how to ignore xb and yb and suppress the warning >> correctly. >> > _______________________________________________ > Sbcl-help mailing list > Sbc...@li... > https://lists.sourceforge.net/lists/listinfo/sbcl-help > |