Copyright (C) 1994, Digital Equipment Corp.
<* PRAGMA LL *>
INTERFACE VT;
IMPORT MText, Rd, Thread, VTDef;
PROCEDURE New (mtext: MText.T): VTDef.T RAISES {VTDef.Error};
PROCEDURE Replace (vt: VTDef.T; begin, end: CARDINAL; text: TEXT)
RAISES {Rd.EndOfFile, Rd.Failure, Thread.Alerted};
PROCEDURE ReplaceChars ( vt : VTDef.T;
begin, end: CARDINAL;
READONLY str : ARRAY OF CHAR)
RAISES {Rd.EndOfFile, Rd.Failure, Thread.Alerted};
PROCEDURE ReplaceFile (vt : VTDef.T;
begin, end: CARDINAL;
file : Rd.T;
start : CARDINAL := 0;
numChars : CARDINAL := LAST (CARDINAL))
RAISES {Rd.EndOfFile, Rd.Failure, Thread.Alerted};
PROCEDURE Close (vt: VTDef.T); <* LL = vt.mutex *>
PROCEDURE Invalidate (vt: VTDef.T; b, e, l: CARDINAL)
RAISES {Rd.EndOfFile, Rd.Failure, Thread.Alerted};
END VT.