<> <> <> <> <<>> <> DIRECTORY Rope, UnixDirEnt, UnixSysCalls, UnixTypes; UnixDirectory: CEDAR DEFINITIONS ~ BEGIN ROPE: TYPE ~ Rope.ROPE; RES: TYPE ~ UnixTypes.RES; CHARPtr: TYPE ~ UnixTypes.CHARPtr; DirEnt: TYPE ~ UnixDirEnt.DirEnt; DirEntPtr: TYPE ~ POINTER TO DirEnt; DirPtr: TYPE ~ REF DirRep; DirRep: TYPE; OpenDir: PROC [fileName: CHARPtr] RETURNS [dirp: DirPtr]; ReadDir: PROC [dirp: DirPtr] RETURNS [DirEntPtr]; TellDir: PROC [dirp: DirPtr] RETURNS [INT]; SeekDir: PROC [dirp: DirPtr, loc: INT]; RewindDir: PROC [dirp: DirPtr]; CloseDir: PROC [dirp: DirPtr] RETURNS [RES]; NameFromDirEntP: PROC [dp: DirEntPtr] RETURNS [name: ROPE]; END. <<>>