4.8. Duplicate Directory

Version I.5, September 1978

COPYDUPDIR

page245 This program will copy the duplicate directory into the primary directory location. If the disk is not currently maintaining a current directory the program will tell you so. To use this program e(x)ecute COPYDUPDIR. The program will ask for the drive in which the copy is to take place (4 or 5). If no duplicate directory is found it will tell you after you indicate the drive unit. If the duplicate is found then it will ask you if you are sure you want to destroy the directory in blocks 2-5. A ‘Y’ will execute the copy, any other character will abort the program.

MARKDUPDIR

This program will mark a disk that is currently not maintaining a duplicate directory so that it will. Caution must be exercised to be sure that blocks 6–9 are free for use. If they are not one must rearrange the files as to make them free. One can tell if they are available by getting an E)xtended listing in the Filer and checking to see where the first file starts. If the first file starts at block 6 or the first file starts at block 10 but there is a 4 block unused section at the top, then the disk has not been marked. If however, the first file starts at block 10 and there is no unused blocks at the beginning of the directory then the disk has been marked. 
SYSTEM.PASCAL   31 30-Aug-78  6 Codefile
  or 
<unused>        14            6
SYSTEM.PASCAL   31 30-Aug-78 10 Codefile
Both of the above cases indicate disks that have not been marked. Below is the directory of a properly marked disk. page246 
SYSTEM.PASCAL   31 30-Aug-78 10 Codefile

To execute this program e(X)ecute MARKDUPDIR. The program will ask you which unit contains the disk to be marked (4 or 5). The program will check to see if it thinks that the blocks 6-9 are free. If the program doesn't think so it will ask you if you are sure they are free? Typing ‘Y’ will execute the mark, any other character will abort the program. Be sure that the space is free before marking it as a duplicate directory.

This page last regenerated Sun Jul 25 01:11:47 2010.