.#��! 2- Maple_Program% maple� / custom_variable��! 33 Maple_Prompt_Regexp+ ^[a-zA-Z]*>� / custom_variable*�! 5 ) Maple_Pid+" -1�) Maple_Pid,*�! 9 # buf+*�" 10 ) this_line ) mark_line+*�" 11 ! m # len+��" 13 ) Maple_Pid� , process_mark�! m�" 15 ) wh
at_line�) this_line�" 16 ) push_mark��" 17 ! m� . goto_user_mark�" 18 ) what_line�) mark_line�" 20 ) this_line ) mark_line@.�" 24 * pop_mark_0�" 25 - push_mark_eob�" 26 ) bufsubstr�# buf/.�" 31 * pop_mark_1�" 32 # eol�" 33 ) push_mark��" 34 3 Maple_Prompt
_Regexp� * re_bsearch�# len�" 35 # len.�" 37 * pop_mark_0w/b��" 40 # len! 1:� ( go_right�" 41 ) bufsubstr�# buf�" 42 # eob��" 43 # buf� & insert/d�" 45 ' newline��" 46 ! m� . move_user_mark��" 47 ) Maple_Pid� # buf$" \n� & strcat� , send_process�! 7y0 ma
ple_send_input�" 50( MapleMap�" $1��" 51 " $1� ( keymap_p.� " $1� + make_keymap/b��" 520 maple_send_input" ^M " $1� ) definekey,*�" 54 # pid % flags & status+*�" 56 # msg+�" 57 # eob��" 58 # pid % flags & status� 9 aprocess_stringify_status�# msg��" 5
9$7 \n\n----- %s ------\n\n # msg� ' vinsert�" 60 % flags! 2B.�" 61" -1�) Maple_Pid/c�" 54y4 maple_signal_handler,*�" 64 # pid # str+�" 66 # eob�" 67 ) push_spot��" 68 # str� & insert�" 69 ( pop_spot�" 70 # bol��" 71$" \r + Null_String� ' replace�" 72 
# eob���" 73 # pid� , process_mark� . move_user_mark�" 64y3 maple_insert_output,*�" 78 # buf+' *maple*�# buf*�" 79 # arg % nargs+! 0�% nargs�" 81 ) Maple_Pid" -1B� # buf� ' bufferpC.��" 83O Currently, only one maple process is supported.� % error/c��
" 86 # buf� ' pop2buf��" 87( MapleMap� * use_keymap��" 88/ maple_mode_hook� . run_mode_hooks�" 89 , erase_buffer.��" 94 - Maple_Program % nargs" 32� / extract_element�# arg�" 95 # arg $ NULLA.v/c�" 98�% nargs�" 99 # arg/e�# 102 % nargs! 1:�# 103 , op
en_process�) Maple_Pid��# 104 ) Maple_Pid& signal4 maple_signal_handler� + set_process��# 105 ) Maple_Pid& output3 maple_insert_output� + set_process�" 76y% maple