Edit file File name : sccs.slc Content :.#(�" 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,*�" 59 $ file+*�" 61 # cmd+*�" 62 # dir+*�" 63 $ name+���" 65 2 Checking out %s... $ file� ' sprintf� % flush��" 67 $ file� . parse_filename�$ name�# dir��" 69 8 cd %s; sccs edit %s 2>&1 # dir $ name� ' sprintf�# cmd�" 70! 0� # cmd� 0 execute_sccs_cmdB.��" 71 6 Error checki ng out %s! $ file� & verror/c���" 73 7 Checking out %s...done. $ file� ' sprintf� % flush�" 59�( checkout,*�" 76 $ file+*�" 78 # dir $ name # cmd+��" 80 $ file� , write_bufferP��" 82 $ file� . parse_filename�$ name�# dir��" 83 7 Enter a change comment: , Last_Comment� ) read_mini�, Last_Comment��" 85 R cd %s; echo "%s" | sccs delget %s > /dev/null 2>&1�" 86 # dir , Last_Comment $ name��" 85 ' sprintf�# cmd�" 87! 0� # cmd� 0 execute_sccs_cmdB.��" 88 5 Error checking in %s! $ file� & verror/c��" 90! 1 � , set_readonly��" 91 > Note: file is write protected.� % flush�" 76�' checkin,*�" 96 $ file+*�" 98 # dir $ name # cmd+��# 100 $ file� , write_bufferP���# 102 . Creating %s... $ file� ' sprintf� % flush��# 104 $ file� . parse_filename�$ name�# dir��# 10 6 F cd %s; sccs create %s > /dev/null 2>&1�# 107 # dir $ name��# 106 ' sprintf�# cmd�# 108! 0� # cmd� 0 execute_sccs_cmdB.��# 109 G Error doing initial sccs-create for %s! $ file� & verrorw/c��# 113! 1� , set_readonly��# 114 > Note: file is write protec ted.� % flush�" 96�+ sccs_create,*�# 121 # dir $ file+�# 124 + getbuf_infoPP�# dir�$ file��# 125 # dir $ file� & dircat�$ file�# 129! 0�� $ file� 3 build_sccs_filename� + file_statusA.��# 131 $ file� + sccs_createw/c�# 137 + is_readonly.��# 139 $ file� ( checkout��# 140 ' whatbuf� & delbuf��# 141 $ file� ) find_filePw/c��# 146 $ file� ' checkin�# 119y5 sccs_check_in_and_out,*�# 153 ) sccs_file $ file+��# 155 / SCCS open file:� 3 read_file_from_mini�$ file�# 160! 1� $ file� + file_statusA.��# 162 $ fil e� ) find_fileP�# 163 + is_readonly.�# 164 5 sccs_check_in_and_out/cw/c��# 169 $ file� 3 build_sccs_filename�) sccs_file�# 172! 0� ) sccs_file� + file_statusA.��# 173 7 SCCS file %s not found. ) sccs_file� & verrorw/c��# 177 $ file� ( checkout��# 178 $ f ile� ) find_fileP�# 151y. sccs_open_file Save