class
	LEXICAL

General
	cluster: lex
	description: "Lexical analyzers"
	create: make_new, make

Ancestors
	TEXT_FILLER*

Queries
	buffer: STRING_8
	buffer_item_code (c: INTEGER_32): INTEGER_32
	buffer_size: INTEGER_32
	char_buffered_number: INTEGER_32
	column_nb_array: LEX_ARRAY [INTEGER_32]
	dfa: FIXED_DFA
	end_of_text: BOOLEAN
	file_name: STRING_8
	keyword_code (word: STRING_8): INTEGER_32
	keyword_string (n: INTEGER_32): STRING_8
	last_is_keyword: BOOLEAN
	last_keyword_code: INTEGER_32
	last_keyword_text: STRING_8
	last_string_read: STRING_8
	last_token: TOKEN
	line_nb_array: LEX_ARRAY [INTEGER_32]
	No_token: INTEGER_32
	other_possible_tokens: ARRAY [INTEGER_32]
	token_column_number: INTEGER_32
	token_line_number: INTEGER_32
	token_type: INTEGER_32

Commands
	close_file
	create_buffers (buf, lin: INTEGER_32)
	exclude (i, j: INTEGER_32)
	fill_buffer (b: INTEGER_32)
	fill_whole_buffer
	get_any_token
	get_fixed_token (l: INTEGER_32)
	get_short_token
	get_token
	make
	make_new
	resize_and_fill_buffer (buf, b: INTEGER_32)
	set_file (f_name: STRING_8)
	set_separator_type (type: INTEGER_32)
	set_string (s: STRING_8)
	trace