.#,* # tmp+* ! n+! 0°! n* # buf+* ! t+ $ time°! tý # tmp $ timeþ & strcat°# tmp.ý$ %s%d # tmp ! nþ ' sprintf°# buf·! n/.ý # bufþ ' bufferp/k # bufy4 make_tmp_buffer_name,* # str $ file . write_function+* # ret+" -1°# ret* # buf+ý + Null_Stringþ
 4 make_tmp_buffer_name°# buf* $ cbuf+ ' whatbuf°$ cbufý # bufþ & setbufý # strþ & insertý! 0þ 8 set_buffer_modified_flag ) push_mark # bobý $ fileþ . write_functionM°# retý $ cbufþ & setbufý # bufþ & delbuf # rety5 misc_do_write_to_file,* # str $ file+
ý # str $ file}5 append_region_to_fileþ 5 misc_do_write_to_filey5 append_string_to_file,* # str $ file+ý # str $ file}4 write_region_to_fileþ 5 misc_do_write_to_filey4 write_string_to_file,* $ glob+* & regexp+$ ^\\C°& regexp $ globýþ.* " ch+°" ch
 " ch." 46x3# \\.°" ch/." 63x3! .°" ch/." 42x3" .*°" ch/.ý " chþ $ char°" chý' []\\^$+ " chþ ) is_substr.ý" \\ " chþ & strcat°" ch/c/jý & regexp " chþ & strcat°& regexp/ƒý & regexp! $þ & strcaty. glob_to_regexp,* # pat+ý. list directoryþ
 3 read_file_from_mini°# patý # patþ & strlen.w/b* # dir+ý # patþ , path_dirname°# dirý # patþ - path_basename°# patý # patþ & strlen.! *°# pat/bý # dirþ + file_status! 2B.ý5 %s is not a directory # dirþ & verror/c* % files+ý # dirþ ' listdir°% files
 % files $ NULLA.ý! 0 + String_Type!°% files/cý # patþ . glob_to_regexp°# patýýý ( Int_Type}, string_match % files # pat! 1þ ) array_mapþ % where % files!°% filesýý % filesþ * array_sort % files!°% files* $ cbuf+ ' whatbuf°$ cbufý+ *directory*þ
 ' pop2buf* $ file # buf % flags+ + getbuf_info°% flags°# bufP°$ fileý $ file # dir # buf % flagsþ + setbuf_info , erase_bufferý % filesþ & length.ý ) Void_Type}' vinsert$ %s\n % filesþ ) array_map 8 buffer_format_in_columns/c # bobý. Directory %s\n
 # dirþ ' vinsert # bobý! 0þ 8 set_buffer_modified_flagý $ cbufþ ' pop2bufy. list_directory,* ' dirspec+* ' buf_dir # dir+* ' pattern+* % files ! i+ý ' dirspecþ & strlen.! *°' dirspec/b + getbuf_infoPP°' buf_dirPý ' dirspecþ 0 extract_filename
°' patterný ' dirspec! 1ý ' dirspecþ & strlený ' patternþ & strlen:þ & substr°# dirý ' buf_dir # dirþ & dircat°# dirý # dirþ & strlen.! .°# dir/bý ' patternþ . glob_to_regexp°' patterný # dirþ ' listdir°% files % files $ NULLAý % filesþ & length! 0AD.
! 0w/cý ( Int_Type}, string_match % files ' pattern! 1þ ) array_map°! iýý ! iþ % where % files!°% files % filesýþ./ƒý % filesþ & lengthy) directory