DIRECTORYBasicTime USING [GMT, nullGMT],Rope USING [ROPE];FSExtras: CEDAR DEFINITIONS = BEGINNewCopy: PROC [from, to: Rope.ROPE, setKeep: BOOLEAN _ FALSE, keep: CARDINAL _ 1, wantedCreatedTime: BasicTime.GMT _ BasicTime.nullGMT, remoteCheck: BOOLEAN _ TRUE, attach: BOOLEAN _ FALSE, wDir: Rope.ROPE _ NIL] RETURNS [toFName: Rope.ROPE];RemoteOp: TYPE = {startRetrieving, endRetrieving, startStoring, endStoring, startDeleting, endDeleting, startRenaming, endRenaming, startFlushing, endFlushing};RemoteEvent: TYPE = RECORD [op: RemoteOp, -- remote operation that has occurredfName: Rope.ROPE, -- full GName of the remote file operated uponchain: REF RemoteEvent -- used internally to chain events together];NextRemoteEvent: PROC [REF READONLY RemoteEvent _ NIL] RETURNS [REF READONLY RemoteEvent];CreateOp: TYPE = {writeClose, renameTo, copyTo};CreateEvent: TYPE = RECORD [op: CreateOp, -- creation operation that has occurredfName: Rope.ROPE, -- full LName of the local file that has been createdchain: REF CreateEvent -- used internally to chain events together];NextCreateEvent: PROC [REF READONLY CreateEvent _ NIL] RETURNS [REF READONLY CreateEvent];END.  P  FSExtras.mesaCreated by M. D. Schroeder, November 15, 1983 9:55 amEdit history: MDS @ November 15, 1983 9:57 amFSExtras contains items which will be added to FS and/or FSBackdoor the next time those interfaces can be recompiled.The following item will replace the Copy procedure from the FS interface. The only difference is that the full FName of the "to" file created by the copy is returned.The following items will replace EventOp, EventHandle, EventObject, and NextEvent from FSBackdoor.A remote event is the start or conclusion of retrieving, storing, deleting, renaming or flushing (from the cache) a global file.  NextRemoteEvent returns the next event that occurs after the argument RemoteEvent.  When the argument RemoteEvent is NIL then NextRemoteEvent returns the first event to occur after the time of the call.  NextRemoteEvent will WAIT if another event has not occurred yet.  Storing, retrieving and flushing of several files can be in progress simultaneously.Client errors:  noneUser errors:  noneThe following items will be added to FSBackdoor.A creation event is the closing of a local file that was open for write (was just created or overwritten), the completion of an FS.Rename call where "to" is an LName, or the completion of an FS.Copy call where "to" is an LName.  NextCreateEvent returns the next event that occurs after the argument CreateEvent.  When the argument CreateEvent is NIL then NextCreateEvent returns the first event to occur after the time of the call.  NextCreateEvent will WAIT if another event has not occurred yet.Client errors:  noneUser errors:  none‌ت  –"cedar" styleک Icode2™K™5K™-code1ڑدk	ک	Lڑœ
‌œ‌œکLڑœ‌œ‌œک—K™uKڑœ
‌œ‌œ‌ک#™¦Kڑدnœ‌œ‌œ‌œ‌œ‌œ#‌œ#‌œ‌œ
‌œ‌œ‌œ‌œ‌œ‌œکٍ—™bKڑœ
‌œ’ک ڑœ‌œ‌œکKڑœدc%ک3Kڑœ‌œں.ک@Kڑœ‌œں+کBKڑœک—ڑ‍œ‌œ‌œ‌œ‌œ‌œ‌œ‌œکZIcode3ڑدièœ ذik i، }™نMڑœ™Mڑœ™——™0Kڑœ
‌œ"ک0ڑœ‌œ‌œکKڑœں'ک5Kڑœ‌œں5کGKڑœ‌œں+کBKڑœک—ڑ‍œ‌œ‌œ‌œ‌œ‌œ‌œ‌œکZMڑ éœ <œ œ ، 
œ Hœ ، '™ٌMڑœ™Mڑœ™——Kڑ‌œکKک — …—    œ  ù  