// TFSWriteDummy.bcpl compileif newname DebugSw then [ manifest [ DebugSw = false ] ] external [ DiskFindHole; TFSCreateDDMgr; TFSWritePages; TFSCreateFile; TFSDeletePages; TFSAssignDiskPage; TFSReleaseDiskPage ] external [ LockDD; ReadDDPage; UnlockDD; FlushDD; OpenDD; CloseDD; DestroyDDMgr ] compiletest not DebugSw then [ static [ DiskFindHole; TFSCreateDDMgr; TFSWritePages; TFSCreateFile; TFSDeletePages; TFSAssignDiskPage; TFSReleaseDiskPage ] static [ LockDD; ReadDDPage; UnlockDD; FlushDD; OpenDD; CloseDD; DestroyDDMgr ] ] or [ external SwappedOut let DiskFindHole() be SwappedOut() and TFSCreateDDMgr() be SwappedOut() and TFSWritePages() be SwappedOut() and TFSCreateFile() be SwappedOut() and TFSDeletePages() be SwappedOut() and TFSAssignDiskPage() be SwappedOut() and TFSReleaseDiskPage() be SwappedOut() and LockDD() be SwappedOut() and ReadDDPage() be SwappedOut() and UnlockDD() be SwappedOut() and FlushDD() be SwappedOut() and OpenDD() be SwappedOut() and CloseDD() be SwappedOut() and DestroyDDMgr() be SwappedOut() ] // DCS, October 12, 1978 4:46 PM, created to avoid undefs without loading more TFS files // October 16, 1978 12:02 PM, insert real values // October 30, 1978 6:53 AM, add more for changed TFS // February 20, 1979 3:33 PM, add BFSFindHole, too -- all that's left from BFSWriteDummy // September 7, 1979 12:48 PM, take BFSFindHole back out needed to create Spruce.CheckPoints //