Copyright (C) 1994, Digital Equipment Corp.
This module contains caret support for VTs.
INTERFACE VTCaret;
IMPORT Rd, Thread, VTDef;
TYPE
T = VTDef.T;
I = VTDef.I;
OnOffState = VTDef.OnOffState;
View = VTDef.View;
PROCEDURE Init (vt: T) RAISES {};
PROCEDURE InitInView (view: View)
RAISES {Rd.EndOfFile, Rd.Failure, Thread.Alerted};
Initialize the caret for a VT.
PROCEDURE Switch (vt: T; state: OnOffState)
RAISES {Rd.EndOfFile, Rd.Failure, Thread.Alerted};
PROCEDURE Move (vt: T; place: CARDINAL)
RAISES {Rd.EndOfFile, Rd.Failure, Thread.Alerted};
The exported operations, as described in VText.def
PROCEDURE Deactivate (view: View) RAISES {};
PROCEDURE Reactivate (view: View)
RAISES {Rd.EndOfFile, Rd.Failure, Thread.Alerted};
Deactivate temporarily removes the display of the caret; it will be
reactivated by Reactivate. Multiple deactivations require multiple
reactivations.
PROCEDURE Close (vt: T) RAISES {};
Close a VT's caret.
END VTCaret.