Page 71 Table of Contents Index Page 73
Chapters
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30
A, B, C, D, E



CHAPTER 9. PORTS, GRAFTS, AND MIRRORED SHEETS

units specifies the units of the coordinate system and defaults to :device, which means the
device units of the host window system (such as pixels). Other supported values include :inches,
:millimeters, and :screen-sized, which means that one unit in each direction is the width
and height of the display device.

Minor issue: I don't know how much of this is obsolete. | RSL

=> graft object [Generic Function]
Returns the graft currently associated with object. graft is defined for all sheet classes (includ-
ing streams that support the CLIM graphics protocol), mediums, and application frames. For
degrafted sheets or other objects that aren't currently associated with a particular graft, graft
will return nil.

=> map-over-grafts function port [Function]
Invokes function on each existing graft associated with the port port. function is a function of
one argument, the graft; it has dynamic extent.

=> with-graft-locked graft &body body [Macro]
Executes body after grabbing a lock associated with the graft graft, which may be a graft or any
object on which the function graft works. If object currently has no graft, body will be executed
without locking.

body may have zero or more declarations as its first forms.

=> graft-orientation graft [Generic Function]
Returns the orientation of the graft graft's coordinate system. The returned value will be ei-
ther :default or :graphics. The meanings of these values are the same as described for the
orientation argument to find-graft.

=> graft-units graft [Generic Function]
Returns the units of the graft graft's coordinate system. The returned value will be one of
:device, :inches, :millimeters, or :screen-sized. The meanings of these values are the
same as described for the units argument to find-graft.

=> graft-width graft &key (units :device) [Generic Function]
=> graft-height graft &key (units :device) [Generic Function]
Returns the width and height of the graft graft (and by extension the associated host window) in
the units indicated. Units may be any of :device, :inches, :millimeters, or :screen-sized.
The meanings of these values are the same as described for the units argument to find-graft.


Page 71 Table of Contents Index Page 73
Chapters
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30
A, B, C, D, E