ui/src/nt/NTScrnPntOp.i3


Copyright (C) 1994, Digital Equipment Corp.
 by Steve Glassman, Mark Manasse and Greg Nelson 
<*PRAGMA LL*>

UNSAFE INTERFACE NTScrnPntOp;

IMPORT NTScrnCrsr, NTScreenType, ScrnPaintOp;

REVEAL NTScreenType.T <: T;

TYPE
  T_Pub = NTScrnCrsr.T OBJECT END;
  T <: T_Pub;

PROCEDURE NewOracle(st: NTScreenType.T): ScrnPaintOp.Oracle;

END NTScrnPntOp.