(* Copyright (C) 1989, Digital Equipment Corporation *) (* All rights reserved. *) (* See the file COPYRIGHT for a full description. *) (* Last modified on Thu May 3 09:56:26 1990 by muller *) INTERFACE UFileRdWr; IMPORT Rd, Wr; (* Both routine try to create a well-adapted reader by looking at the kind of file they are connected to. *) PROCEDURE CreateFileReader (fd: INTEGER): Rd.T; (* create a reader connected to the opened Ultrix file descriptor fd *) PROCEDURE CreateFileWriter (fd: INTEGER; buffered := FALSE): Wr.T; (* create a writer connected to the opened Ultrix file descriptor fd. If buffered is TRUE, the writer is buffered regardless of the kind of Ultrix file (otherwise, terminal writers are not buffered). *) END UFileRdWr.