Copyright (C) 1994, Digital Equipment Corp.
<* PRAGMA LL *>
The VBTColors interface provides a way to associate a
VBT's background and foreground colors with the VBT. This
information can be retrieved by some other VBT to compute a
related color.
INTERFACE VBTColors;
IMPORT PaintOp, VBT;
PROCEDURE Put (v: VBT.T; colors: PaintOp.ColorScheme);
<* LL.sup < v *>
Store colors with v.
PROCEDURE Get (v: VBT.T): PaintOp.ColorScheme;
<* LL.sup < v *>
Return the colors stored by the most recent call to Put. If
Put has never been called on v, return PaintOp.bgFg.
END VBTColors.