ui/src/nt/NTScrnCmap.i3


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

UNSAFE INTERFACE NTScrnCmap;

IMPORT NTScreenType, ScrnColorMap, TrestleComm, WinDef;

PROCEDURE NewOracle (scrn: NTScreenType.T):
  ScrnColorMap.Oracle RAISES {TrestleComm.Failure};
create a ScrnColorMap.Oracle suitable for use with an NTScreenType.T

PROCEDURE ColorMapID(cm: ScrnColorMap.T): WinDef.HPALETTE;
Return the NT palette or NT.CNULL if the screentype of cm is not of type T. LL arbitrary.

END NTScrnCmap.