class RUNES_CURSOR < $TEXT_CURSOR{RUNE,RUNES} |
---|
$TEXT_CURSOR{_,_} | $CURSOR{_,_} |
attr buffer : STP ; .. Included as buffer |
---|
attr comment_end : STP ; .. Included as comment_end |
---|
attr comment_start : STP ; .. Included as comment_start |
---|
attr error : CURSOR_ERRORS ; .. Included as error |
---|
attr index : CARD ; .. Included as index |
---|
attr is_done : BOOL ; .. Included as is_done |
---|
attr line_no : CARD ; .. Included as line_no |
---|
attr skip_val : ELT ; .. Included as skip_val |
---|
advance .. Included as advance |
---|
advance : SAME .. Included as advance |
---|
clear .. Included as clear |
---|
clear_error .. Included as clear_error |
---|
create(str : STP) : SAME .. Included as create |
---|
current_line : STP .. Included as current_line |
---|
current_loc_str( .. Included as current_loc_str |
---|
get_block( begin_delimiter, finish_delimiter : ELT ) : STP .. Included as get_block |
---|
get_char : ELT .. Included as get_char |
---|
get_item : ELT .. Included as get_item |
---|
get_line_mark : STP .. Included as get_line_mark |
---|
get_over_cut(cut_set : STP) : STP .. Included as get_over_cut |
---|
get_pred(predicate : ROUT{ELT} : BOOL) : STP .. Included as get_pred |
---|
get_remainder : STP .. Included as get_remainder |
---|
get_rest_upto(elem : ELT) : STP .. Included as get_rest_upto |
---|
get_str : STP .. Included as get_str |
---|
get_upto(count : CARD) : STP .. Included as get_upto |
---|
get_upto(elem : ELT) : STP .. Included as get_upto |
---|
get_upto : STP .. Included as get_upto |
---|
get_upto_char(ch : ELT) : STP .. Included as get_upto_char |
---|
get_upto_cut(cut_set : STP ) : STP .. Included as get_upto_cut |
---|
get_word(max_size : CARD) : STP .. Included as get_word |
---|
get_word : STP .. Included as get_word |
---|
has_error : BOOL .. Included as has_error |
---|
**** |
__This_predicate_returns_true_if_and_only_if_the_cursor_has_encountered ___an_error_which_has_not_been_cleared._Note_-_this_implementation_is_a_hack ___because_of_compiler_'confusion'_between_zero_and_void_for_immutable_types. |
is_line_mark : BOOL .. Included as is_line_mark |
---|
**** |
__This_predicate_returns_true_if_and_only_if_the_cursor_is_positioned_at ___a_line_mark.__The_cursor_is_not_moved. |
is_value(val : ELT) : BOOL .. Included as is_value |
---|
**** |
__This_predicate_returns_true_if_and_only_if_the_current_string_element ___has_the_value_val,_otherwise_false. |
item : ELT .. Included as item |
---|
reassign( str : STP) .. Included as reassign |
---|
remaining : CARD .. Included as remaining |
---|
**** | This routine returns the number of items yet to be scanned in
___the_buffer. |
reset_line( |
---|
retract .. Included as retract |
---|
retract : SAME .. Included as retract |
---|
set_comment_end(char : ELT) .. Included as set_comment_end |
---|
set_comment_end(str : STP) .. Included as set_comment_end |
---|
set_comment_start(char : ELT) .. Included as set_comment_start |
---|
set_comment_start(str : STP) .. Included as set_comment_start |
---|
set_index( new_posn : CARD) .. Included as set_index |
---|
set_skip(val : ELT) .. Included as set_skip |
---|
set_skip(val : ELT) : SAME .. Included as set_skip |
---|
skip_block(start_delimiter, finish_delimiter : ELT) .. Included as skip_block |
---|
skip_block(start : STP, stop : STP) : BOOL .. Included as skip_block |
---|
skip_comment : BOOL .. Included as skip_comment |
---|
skip_over .. Included as skip_over |
---|
skip_over( val : ELT) .. Included as skip_over |
---|
skip_over( val : ELT) : SAME .. Included as skip_over |
---|
skip_over(str : STP) .. Included as skip_over |
---|
skip_over(str : STP) : SAME .. Included as skip_over |
---|
skip_over : SAME .. Included as skip_over |
---|
skip_over_line .. Included as skip_over_line |
---|
skip_space .. Included as skip_space |
---|
**** |
skip_space : SAME .. Included as skip_space |
---|
**** |
skip_to .. Included as skip_to |
---|
skip_to(elem : ELT) .. Included as skip_to |
---|
skip_to(elem : ELT) : SAME .. Included as skip_to |
---|
skip_to(str : STP) .. Included as skip_to |
---|
skip_to(str : STP) : SAME .. Included as skip_to |
---|
skip_to : SAME .. Included as skip_to |
---|
skip_word .. Included as skip_word |
---|
skip_word : SAME .. Included as skip_word |
---|
split( .. Included as split |
---|
line!(once escape : ELT, out line_num : CARD) : SAME .. Included as line! |
---|
**** | "escape" may be void! |
attr buffer : STP ; .. Included as buffer |
---|
attr comment_end : STP ; .. Included as comment_end |
---|
attr comment_start : STP ; .. Included as comment_start |
---|
attr error : CURSOR_ERRORS ; .. Included as error |
---|
attr index : CARD ; .. Included as index |
---|
attr is_done : BOOL ; .. Included as is_done |
---|
is_same(str : STP) : BOOL .. Included as is_same |
---|
**** |
__This_predicate_returns_true_if_and_only_if_the_string_starting_at ___the_current_positiion_is_identical_to_str.__If_true_is_returned_then_the ___current_index_position_is_at_the_character_next_after_str. |
attr line_no : CARD ; .. Included as line_no |
---|
skip_back_to_line_start .. Included as skip_back_to_line_start |
---|
attr skip_val : ELT ; .. Included as skip_val |
---|
try_skip_comment : BOOL .. Included as try_skip_comment |
---|