I generate patches of Morphic worlds that views below certain Morphs. This facility is used for the end-user scripting system.

	drawing-general
	fullDrawMorph:

	drawing-support
	clipBy:during: preserveStateDuring: transformBy:clippingTo:during:smoothing: translateBy:clippingTo:during: translateBy:during: translateTo:clippingTo:during:

	initialize-release
	reset

	private
	setForm:

	accessing	top
	doStop
	doStop:
	foundMorph
	foundMorph:
	stopMorph
	stopMorph:

	drawing-general	top
	fullDrawMorph:

	drawing-support	top
	clipBy:during: Set a clipping rectangle active only during the execution of aBlock. Note: In the future we may want to have more general clip shapes - not just rectangles
	preserveStateDuring: Preserve the full canvas state during the execution of aBlock. Note: This does *not* include the state in the receiver (e.g., foundMorph).
	transformBy:clippingTo:during:smoothing: Note: This method has been originally copied from TransformationMorph.
	translateBy:clippingTo:during: Set a translation and clipping rectangle only during the execution of aBlock.
	translateBy:during: Set a translation only during the execution of aBlock.
	translateTo:clippingTo:during: Set a new origin and clipping rectangle only during the execution of aBlock.

	initialize-release	top
	reset Initialize the receiver to act just as a FormCanvas

	private	top
	setForm: Initialize the receiver to act just as a FormCanvas