Copyright (C) 1992, Digital Equipment Corporation
All rights reserved.
See the file COPYRIGHT for a full description.
Last modified On Tue Jun 16 13:12:42 PDT 1992 by muller
modified On Mon Oct 14 21:48:33 PDT 1991 by meehan
Modified On Mon Nov 12 17:28:12 1990 by jdd
INTERFACE VTMarker;
IMPORT VTDef;
TYPE
T = VTDef.T;
I = VTDef.I;
Index = VTDef.Index;
Marker = VTDef.Marker;
MarkerOptions = VTDef.MarkerOptions;
OnOffState = VTDef.OnOffState;
Tint = VTDef.Tint;
WhichEnd = VTDef.WhichEnd;
PROCEDURE New
(vt: T; at: Index; READONLY options: MarkerOptions): Marker RAISES {};
PROCEDURE MakeOptions
(whichEnd: WhichEnd; top, bottom: BOOLEAN; stroke: Tint): MarkerOptions
RAISES {};
PROCEDURE Switch (marker: Marker; state: OnOffState) RAISES {};
PROCEDURE Move (marker: Marker; h: Index) RAISES {};
PROCEDURE ChangeOptions
(marker: Marker; READONLY options: MarkerOptions) RAISES {};
PROCEDURE Close (marker: Marker) RAISES {};
PROCEDURE Fix (vt: T) RAISES {};
PROCEDURE FirstMarker (vt: T; at: I): Marker RAISES {};
PROCEDURE NextMarker (vt: T; VAR (*INOUT*) marker: Marker) RAISES {};
END VTMarker.