Copyright (C) 1994, Digital Equipment Corp.
<* PRAGMA LL *> <* PRAGMA SUBTYPE *>A
MenuSwitchVBT
is a switch version of Trestle's MenuBtnVBT
.
INTERFACEMenuSwitchVBT ; IMPORT FeedbackVBT, MenuBtnVBT, VBT; TYPE <* SUBTYPE T <: MultiFilter.T *> T <: Public; Public = MenuBtnVBT.T OBJECT METHODS <* LL.sup <= VBT.mu *> init (f: FeedbackVBT.T): T; <* LL.sup = VBT.mu *> callback (READONLY cd: VBT.MouseRec); END; END MenuSwitchVBT.