.#& , Last_Comment+ °, Last_Comment,* $ file+* # dir+ý $ fileþ . parse_filename°$ file°# dirýý # dir# RCSþ & dircatý $ file" ,vþ & strcatþ & dircatw‚2 build_rcs_filename,* $ file+* # cmd # dir $ name+ýý2 Checking out %s... $ fileþ ' sprintfþ % flushý $ fileþ . parse_filename°$ name°# dirý@ cd %s; co -l %s > /dev/null 2>&1 # dir $ nameþ ' sprintf°# cmd! 0ý # cmdþ & systemB.ý6 Error checking out %s! $ fileþ & verror/cýý7 Checking out %s...done. $ fileþ ' sprintfþ % flush‚( checkout,* $ file # msg+* # dir $ name # cmd+ý $ fileþ , write_bufferPý $ fileþ . parse_filename°$ name°# dirý # msg , Last_Commentþ ) read_mini°, Last_CommentýI cd %s; echo "%s" | ci %s > /dev/null 2>&1 # dir , Last_Comment $ nameþ ' sprintf°# cmd! 0ý # cmd þ & systemB.ý5 Error checking in %s! $ fileþ & verror/cý! 1þ , set_readonlyý + getbuf_info! 8Jþ + setbuf_infoý> Note: file is write protected.þ % flush‚' checkin,* ( rcs_file # dir $ file+ý. RCS open file:þ 3 read_file_from_mini°$ fileýýâ" -3á $ file!°$ fileý $ fileþ . parse_filename°$ file°# dirýýýâ" -5á # dir! $ fileþ & dircat°$ fileý $ fileþ ( checkoutý $ fileþ ) find_filePy- rcs_open_file,* $ file # dir % flags+ + getbuf_info°% flagsP°# dir°$ fileý # dir $ fileþ & dircat°$ file! 0ýý $ fileþ 2 build_rcs_filenameþ + file_statusA.ý # dir# RCSþ & dircat°# dir! 0ý # dirþ + file_statusA.! 0ý # dir# 511þ % mkdirB.ý@ Error creating RCS directory %s! # dirþ & verror/c/cý $ file5 RCS file description:þ ' checkinw/c % flags! 1! 3GF.ý $ fileþ ( checkoutý ' whatbufþ & delbufý $ fileþ ) find_filePw/cý $ file7 Enter a change comment:þ ' checkiny4 rcs_check_in_and_out& ( rlog_buf+& *rlog*°( rlog_buf,* $ cbuf+ ' whatbuf°$ cbufý ( rlog_bufþ & setbufý! 0þ 8 set_buffer_modified_flagý $ cbufþ & setbufý ( rlog_bufþ & delbufy1 close_rlog_buffer,* ( rcs_file # dir $ file # cmd ( tmp_file+* ( rlog_map+( rlog_map°( rlog_mapý1 rlog of RCS file:þ 3 read_file_from_mini°$ fileýýâ" -3á $ file!°$ fileý $ fileþ . parse_filename°$ file°# dirý ýýâ" -5á # dir! $ fileþ & dircat°$ fileý, /tmp/jedrlogþ - make_tmp_file°( tmp_fileý, rlog %s > %s $ file ( tmp_fileþ ' sprintf°# cmd! 0ý # cmdþ & systemB.ý2 Error rlogging %s! $ fileþ & verror/cý ( rlog_bufþ & sw2bufý ( tmp_fileþ + insert_fileý ( tmp_fileþ + delete_file ) most_modeý ( rlog_mapþ ( keymap_p.ý ( rlog_mapþ + make_keymapý1 close_rlog_buffer! q ( rlog_mapþ ) definekey/bý ( rlog_mapþ * use_keymapý! 1þ , set_readonlyy, rcs_read_logý# rcsþ ' provide