Copyright (C) 1994, Digital Equipment Corp.
by Steve Glassman, Mark Manasse and Greg Nelson
<*PRAGMA LL*> UNSAFE INTERFACENTPaint ; IMPORT NTClientF, TrestleOnNT; REVEAL TrestleOnNT.Display = NTClientF.T_Abs BRANDED OBJECT END; TYPE T <: TrestleOnNT.Display; (* T supplies the painting and capturing methods *) END NTPaint.