ui/src/nt/NTScrnFont.i3


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

UNSAFE INTERFACE NTScrnFont;

IMPORT NTScreenType, ScrnFont, TrestleComm;

PROCEDURE NewOracle (scrn: NTScreenType.T; depthOne := FALSE): ScrnFont.Oracle
  RAISES {TrestleComm.Failure};
create a ScrnFont.Oracle suitable for use with an NTScreenType.T. if depthOne is TRUE then the oracle will be suitable for a 1-bit font for painting on screens of type NTScreenType.T. See the description of bits in ScreenType.i3

END NTScrnFont.