.#(ü" 29 , Last_Comment+  °, Last_Comment,*ü" 32 $ file+*ü" 34 # dir+ýü" 35 $ fileþ . parse_filename°$ file°# dirýýü" 36 # dir$ SCCSþ & dircatý" s. $ fileþ & strcatþ & dircatwü" 32…3 build_sccs_filename,*ü" 40 # cmd+*ü" 42 $ cbuf # buf+ü" 44. *SCCS 
Message*°# bufü" 45 ' whatbuf°$ cbufýü" 46 # bufþ & setbufü" 47 , erase_bufferü" 48! 0ý # cmdþ - run_shell_cmdB.ýü" 50 # bufþ ' pop2bufü" 51" -1w/cýü" 53 # bufþ + bury_bufferýü" 54 $ cbufþ & setbufü" 55! 0wü" 40…0 execute_sccs_cmd,*ü" 58 $ file+*ü" 60
 # cmd+*ü" 61 # dir+*ü" 62 $ name+ýýü" 642 Checking out %s... $ fileþ ' sprintfþ % flushýü" 66 $ fileþ . parse_filename°$ name°# dirýü" 688 cd %s; sccs edit %s 2>&1 # dir $ nameþ ' sprintf°# cmdü" 69! 0ý # cmdþ 0 execute_sccs_cmdB.ýü" 706 Error checki
ng out %s! $ fileþ & verror/cýýü" 727 Checking out %s...done. $ fileþ ' sprintfþ % flushü" 58…( checkout,*ü" 75 $ file+*ü" 77 # dir $ name # cmd+ýü" 79 $ fileþ , write_bufferPýü" 81 $ fileþ . parse_filename°$ name°# dirýü" 827 Enter a change comment: 
  , Last_Commentþ ) read_mini°, Last_Commentýü" 84R cd %s; echo "%s" | sccs delget %s > /dev/null 2>&1ü" 85 # dir , Last_Comment $ nameþü" 84 ' sprintf°# cmdü" 86! 0ý # cmdþ 0 execute_sccs_cmdB.ýü" 875 Error checking in %s! $ fileþ & verror/cýü" 89! 1
þ , set_readonlyýü" 90> Note: file is write protected.þ % flushü" 75…' checkin,*ü" 95 $ file+*ü" 97 # dir $ name # cmd+ýü" 99 $ fileþ , write_bufferPýýü# 101. Creating %s... $ fileþ ' sprintfþ % flushýü# 103 $ fileþ . parse_filename°$ name°# dirýü# 105
F cd %s; sccs create %s > /dev/null 2>&1ü# 106 # dir $ nameþü# 105 ' sprintf°# cmdü# 107! 0ý # cmdþ 0 execute_sccs_cmdB.ýü# 108G Error doing initial sccs-create for %s! $ fileþ & verrorw/cýü# 112! 1þ , set_readonlyýü# 113> Note: file is write protect
ed.þ % flushü" 95…+ sccs_create,*ü# 120 # dir $ file+ü# 123 + getbuf_infoPP°# dir°$ fileýü# 124 # dir $ fileþ & dircat°$ fileü# 128! 0ýý $ fileþ 3 build_sccs_filenameþ + file_statusA.ýü# 130 $ fileþ + sccs_createw/cü# 136 + is_readonly.ýü# 138 $ fileþ (
 checkoutýü# 139 ' whatbufþ & delbufýü# 140 $ fileþ ) find_filePw/cýü# 145 $ fileþ ' checkinü# 118y5 sccs_check_in_and_out,*ü# 152 ) sccs_file $ file+ýü# 154/ SCCS open file:þ 3 read_file_from_mini°$ fileü# 159! 1ý $ fileþ + file_statusA.ýü# 161 $ file
þ ) find_filePü# 162 + is_readonly.ü# 163 5 sccs_check_in_and_out/cw/cýü# 168 $ fileþ 3 build_sccs_filename°) sccs_fileü# 171! 0ý ) sccs_fileþ + file_statusA.ýü# 1727 SCCS file %s not found. ) sccs_fileþ & verrorw/cýü# 176 $ fileþ ( checkoutýü# 177 $ fi
leþ ) find_filePü# 150y. sccs_open_file