View file File name : isearch.slc Content :.#��" 27 ( srchmisc� ' require��" 28 1 Isearch_Highlight! 1� / custom_variable,*�" 29 + search_func ' default+��" 31 � + search_func� ) which_keyP�.*�" 33 # key+�# key��" 34 # key� & strlen! 2A.��" 36! 0 # key!" 94A.��" 37! 1 # key!" 64:w/c/c/� �" 40 ' defaultw�" 29�- get_bound_key��" 43 4 Isearch_Forward_Char��" 44 / isearch_forward" 19� - get_bound_key��" 43 / custom_variable��" 45 5 Isearch_Backward_Char��" 46 0 isearch_backward" 18� - get_bound_key��" 45 / custom_variable��" 47 1 Isearch_Q uit_Char" 27� / custom_variable��" 48 2 Isearch_Abort_Char! 7� / custom_variable��" 54 + SEARCH_WRAP! 0� / custom_variable*�" 56 3 Isearch_Last_Search+ �3 Isearch_Last_Search(�" 58 2 Last_Search_Failed+! 0�2 Last_Search_Failed,*�" 60 # dir+�" 62! 0�2 Last_Search_Failed�" 64 # dir! 0=.�" 65 / search_backward/.�" 67 . search_forward/d�" 68 + LAST_SEARCH�3 Isearch_Last_Search�" 60�5 isearch_simple_search,*�" 71 # str # dir+*�" 73 " cs+ + CASE_SEARCH�" cs��" 74 # str� & strlow # strB.�" 75! 1�+ CAS E_SEARCH/c�" 77 # dir! 0?.��" 78 # str� ' fsearch�# dir/.��" 80 # str� ' bsearch�# dir/d�" 82 " cs�+ CASE_SEARCH�" 83 # dirw�" 71�. perform_search(�" 86 . Position_Stack+,*�" 87 0 attached_to_char+*�" 89 ! s+�" 91 $ mark 0 attached_to_char $ next! 3�" 89�! s�" 93 0 create_user_mark ! s�$ mark�" 94 0 attached_to_char ! s�0 attached_to_char�" 95 . Position_Stack ! s�$ next�" 96 ! s�. Position_Stack�" 87�- push_position,�# 101 $ NULL�. Position_Stack�" 99�5 delete_position_stack,*�# 104 # str+*�# 106 0 attached_to_char+! 1�0 attached_to_char�# 108 . Position_Stack $ NULLB.*�# 110 ! s+ . Position_Stack�! s�# 111 ! s"$ next�. Position_Stack�# 112 ! s"0 attached_to_char�0 attached_to_char��# 113 ! s"$ mark� . goto_user_mark/c�# 116 0 attached_to_char.*�# 118 ! n+� # str� & strlen�! n�# 119 ! n.��# 120 # str! 1 ! n! 1:� & substr�# str/c/c�# 123 # strw�# 104�+ isearch_del,*�# 127 # dir+*�# 129 & prompt # str+ �# str*�# 130 ! c % first+! 1�% first*�# 131 # len+! 0�# len�# 133 5 delete_position_stack* �# 134 * start_mark+ 0 create_user_mark�* start_mark.�# 138 5 delete_position_stack�# 139! 0�2 Last_Search_Failed/o.�# 143 5 delete_position_stack�# 144! 0�2 Last_Search_Failed/n.*�# 149 - prompt_prefix+*�# 150 - prompt_suffix+*�# 151 ! h+ . is_line_hid den�! h��# 152! 0� / set_line_hidden�# 154 2 Last_Search_Failed.�# 156 ) Failed: i�- prompt_prefix��# 157 # str� & strlen! 0?.�# 158 " : �- prompt_suffix/.�# 160 �- prompt_suffix/d/.�# 164 ! I�- prompt_prefix�# 165 " : �- prompt_suffix/d�# 167 # dir! 0?.�# 168 - prompt_prefix . search forward9 - prompt_suffix9�& prompt/.�# 170 - prompt_prefix / search backward9 - prompt_suffix9�& prompt/d��# 172 & prompt # str9� ' message�# 174 ) push_spot�# 176�1 IGNORE_USER_ABORT�# 177 1 Isearch_Highlight.��# 179 # str� * looking_at 2 Last_Search_Failed! 0AC.���# 180 # str� & strlen # dir� 0 mark_next_nchars/c/.�# 184 # dir! 0?� # str� * looking_atC.���# 185 # str� & strlen� ( go_right/c/d��# 187! 0� 7 update_sans_update_hook�# 188 ( pop_spot./.�# 194 & getkey�! c/.�# 199�1 IGNORE_USER_ABORT/���# 201 ! h� / set_line_hidden�# 202 ! c.�# 203 1 Isearch_Quit_Charx % firstC3��# 204 # dir� 5 isearch_simple_searchv/.�# 206 4 Isearch_Forward_Charx3��# 207! 0� - push_position�# 208 # dir! 0=.�# 211! 0�2 Last_Search_Fa iled�# 212! 1�# dir/.�# 216 * go_right_1��# 217 # str� & strlen.�# 219 3 Isearch_Last_Search�# str��# 220 # str� & strlen�# len/b/d/.�# 224 5 Isearch_Backward_Charx3��# 225! 0� - push_position�# 226 # dir! 0?.�# 229! 0�2 Last_Search_Failed�# 230" -1� # dir�# 231" 32�! c/.��# 235 # str� & strlen. 3 Isearch_Last_Search�# str/b/d/.�# 238# 127x3�# 240! 0�2 Last_Search_Failed��# 241 # str� + isearch_del�# stru/.�# 244 2 Isearch_Abort_Charx3��# 245 * start_mark� . goto_user_mark�# 246 $ beepw/.�# 250" 1 3x % firstC3�# 251 # dir! 0?. . search_forwardw/.�# 252 / search_backwardw/d/.�# 255" 27x3��# 256! 3� - input_pending.��# 257 ! c� ( ungetkey/cv/.�# 267 ! c" 32=3�# 268 ! c" 13B.� ! c� ( ungetkey/cv/.��# 272 ! c� $ char�# str��# 273! 1� - push_posit ion�# 275! 0�2 Last_Search_Failed/j�# 278! 0�% first�# 280 2 Last_Search_Failed + SEARCH_WRAP! 0?C.�# 286! 0�2 Last_Search_Failed�# 287 ) push_mark�# 288 # dir! 0?.�# 289 # bob/.�# 291 # eob/d���# 292 # str # dir� . perform_searchN� ( pop_marku/c�# 2 99 # dir! 0=� # str� * looking_atC ! c" 32@C.u/c��# 302 # str # dir� . perform_search.��# 303 # str� & strlen�# len/.*�# 306 # msg+�# 307 ! c 4 Isearch_Forward_CharA. ) go_left_1/c��# 308 # str� & strlen! 0?.��# 309 # str + not found.� & strcat�# msg/ .�# 311 1 No search string.�# msg/d��# 312 # msg� % flush�# 314 + SEARCH_WRAP! 1=.�# 315 $ beep/c��# 316" 10� - input_pendingP�# 318 / EXECUTING_MACRO.��# 319 * Not found.� % error/c�# 322! 1�2 Last_Search_Failed/d/e�# 326 3 EXECUTE_ERROR_BLOCK��# 327 # str� & strlen.�# 328 # str�3 Isearch_Last_Search/c�# 329 # dir! 0?.���# 330 # str� & strlen # len:� ( go_right/c��# 331 % Done.� ' message�# 127y+ isearch_dir,��# 338! 1� + isearch_dir�# 334y/ isearch_forward,��# 346" -1� + isearch_dir�# 342y0 ise arch_backward