ui/src/xvbt/XScrnCmap.i3


 Copyright (C) 1992, Digital Equipment Corporation 
 All rights reserved. 
 See the file COPYRIGHT for a full description. 
 
 by Steve Glassman, Mark Manasse and Greg Nelson 
 Last modified on Fri Nov  6 18:02:54 PST 1992 by msm    
      modified on Mon Feb 24 13:59:53 PST 1992 by muller 
<*PRAGMA LL*>

UNSAFE INTERFACE XScrnCmap;

IMPORT ScrnColorMap, TrestleComm, X, XScreenType;

PROCEDURE NewOracle (scrn: XScreenType.T; READONLY vinfo: X.XVisualInfo):
  ScrnColorMap.Oracle RAISES {TrestleComm.Failure};
create a ScrnColorMap.Oracle suitable for use with an XScreenType.T

PROCEDURE ColorMapID(cm: ScrnColorMap.T): X.Colormap;
Return the XID for cm, or X.None if the screentype of cm is not of type T. LL arbitrary.

END XScrnCmap.