obeying the sheet protocol [correction]

• To: westy@freya.cs.umass.edu, clim@BBN.COM
• Subject: obeying the sheet protocol [correction]
• From: Scott McKay <swm@lyra.mystech.com>
• Date: Thu, 20 Jan 1994 10:03-0500
• In-Reply-To: <9401192221.AA08391@earhart.cs.umass.edu>

    Date: Wed, 19 Jan 1994 17:21 EST
    From: "David L. Westbrook" <westy%earhart@cs.umass.edu>


    [Oops, oversimplified the code in that last one.]

    CLIM 2.0
    Lispworks 3.2b and Allegro 4.2

    When I execute code that sort of looks like this:

    (labels ((map-over (sheet)
		(when (sheetp sheet)
		  (dolist (kid (sheet-children sheet))
		    <...some code...>
		    (map-over kid)))))
      (map-over (frame-top-level-sheet *application-frame*)))

[Didn't read your second message]

I see that MAP-OVER-SHEETS is precisely what you want.

    I get errors similar to this:

    Error: No applicable methods for #<STANDARD-GENERIC-FUNCTION SHEET-CHILDREN 10A4F9B0>
	   with args (#<SCROLL-BAR-PANE :VERTICAL 100A3368>)

    Is there some other way to insure that an object obeys the sheet protocol?

    David L. Westbrook
    westy@cs.umass.edu

• obeying the sheet protocol [correction]
• From: "David L. Westbrook" <westy%earhart@cs.umass.edu>

• Prev: obeying the sheet protocol
• Next: obeying the sheet protocol [correction]
• Index: CLIM Mailing list (1-Jun-94 to 30-Jun-95)
• Thread: CLIM Mailing list Index (1-Jun-94 to 30-Jun-95)