    class
    	EV_REGION_IMP

    General
    	cluster: implementation_mswin
    	description: "Objects that ..."
    	create: make

    Ancestors
    	EV_REGION_I*
    	WEL_REGION

    Queries
    	combine (region: WEL_REGION; mode: INTEGER_32): WEL_REGION
    	exclusive_or (a_region: EV_REGION): EV_REGION
    	exists: BOOLEAN
    	gdi_objects_count: INTEGER_32
    	get_region_box: WEL_RECT
    	intersect (a_region: EV_REGION): EV_REGION
    	is_equal (other: [like Current] EV_REGION_IMP): BOOLEAN
    	item: POINTER
    	object_id: INTEGER_32
    	point_in (x, y: INTEGER_32): BOOLEAN
    	rect_in (rect: WEL_RECT): BOOLEAN
    	reference_tracked: BOOLEAN
    	references_count: INTEGER_32
    	shared: BOOLEAN
    	subtract (a_region: EV_REGION): EV_REGION
    	union (a_region: EV_REGION): EV_REGION

    Commands
    	copy_region (a_region: EV_REGION)
    	decrement_reference
    	delete
    	dispose
    	enable_reference_tracking
    	increment_reference
    	offset (x_offset, y_offset: INTEGER_32)
    	set_item (an_item: POINTER)
    	set_rect (left, top, right, bottom: INTEGER_32)
    	set_rectangle (a_rectangle: EV_RECTANGLE)
    	set_shared
    	set_unshared