    class
    	WEL_RICH_EDIT_BUFFER_SAVER

    General
    	cluster: wel
    	description:
    		"This class allows to get the contents of a rich edit
    		control. Used internally by WEL.

    		Note: Do not use more than one instance of this class at the same
    		time. Nested streams are not supported."
    	create: make

    Ancestors
    	WEL_RICH_EDIT_STREAM_OUT*

    Queries
    	buffer: MANAGED_POINTER
    	error: INTEGER_32
    	exists: BOOLEAN
    	is_equal (other: [like Current] WEL_RICH_EDIT_BUFFER_SAVER): BOOLEAN
    	is_unicode_data: BOOLEAN
    	item: POINTER
    	shared: BOOLEAN
    	stream_result: INTEGER_32
    	Structure_size: INTEGER_32
    	text: STRING_32

    Commands
    	copy (other: [like Current] WEL_RICH_EDIT_BUFFER_SAVER)
    	dispose
    	finish_action
    	init_action
    	initialize
    	initialize_with_character (a_character: CHARACTER_8)
    	memory_copy (source_pointer: POINTER; length: INTEGER_32)
    	release_stream
    	set_error (an_error: INTEGER_32)
    	set_is_unicode_data (v: [like is_unicode_data] BOOLEAN)
    	set_item (an_item: POINTER)
    	set_shared
    	set_unshared

    Constraints
    	text not void