define-graphics-operation

• To: curt@eraserhead.jpl.nasa.gov
• Subject: define-graphics-operation
• From: Scott McKay <swm@harlequin.com>
• Date: Tue, 3 May 94 12:27:37 EDT
• Cc: clim@BBN.COM
• In-Reply-To: Curt Eggemeyer's message of Tue, 3 May 1994 07:41:45 -0700 <199405031441.HAA17672@eraserhead.Jpl.Nasa.Gov>

   Date: Tue, 3 May 1994 07:41:45 -0700
   From: Curt Eggemeyer <curt@eraserhead.jpl.nasa.gov>

   What's CLIM2's equivalent to 1.1's define-graphic-internal and what's
   different about it?

   Below is one of my 1.1 forms below:

   (define-graphics-internal Time-Scale-Display-Internal (Time-Frame ink)
     :bounding-rectangle
     (fix-rectangle (cond ((Legend-On *Apgen*) *Legend-Border*) (t 0))
		    (Display-Y Time-Frame)
		    (+ (Display-X Time-Frame) (Width Time-Frame))
		    (+ (Display-Y Time-Frame) (Height Time-Frame)))
     ;; No :HIGHLIGHTING-TEST, just use the bounding rectangle.
     ;; No :HIGHLIGHTING-FUNCTION, just use a rectangle to do it 
     )



I think DEFINE-GRAPHICS-RECORDING.

• define-graphics-operation
• From: Curt Eggemeyer <curt@eraserhead.jpl.nasa.gov>

• Prev: define-graphics-operation
• Next: menu-bar
• Index: CLIM Mailing list (1-Jun-94 to 30-Jun-95)
• Thread: CLIM Mailing list Index (1-Jun-94 to 30-Jun-95)