/*
 * -- $Header: /cec/src/nestor/servers/R3/shXlib/XCrCmap.c,v 1.1.1.1 90/04/23
 * 09:54:32 spanachi Exp $
 */
#include "copyright.h"

/* $XConsortium: XCrCmap.c,v 11.8 88/09/06 16:05:41 jim Exp $ */
/* Copyright    Massachusetts Institute of Technology    1986	 */

/* -- MULTIPLEX Extension -- */

#include "Xlibint.h"

/* -- additinol includes -- */
#include "resources.h"

Colormap
XCreateColormap (dpy, w, visual, alloc)
  register Display *dpy;
  Window w;
  Visual *visual;
  int alloc;
{
  register xCreateColormapReq *req;
  Colormap mid;

  LockDisplay (dpy);
  GetReq (CreateColormap, req);
  req->window = w;
  mid = req->mid = XAllocID (dpy);
  req->alloc = alloc;
  if (visual == CopyFromParent)
    req->visual = CopyFromParent;
  else
    req->visual = visual->visualid;

  /* -- store the new resource if necessary -- */
  if (XmuXStoreResources (dpy))
    /* -- second last arguments flags that this is a private colormap -- */
    XmuXCreateColormapInfo (dpy, mid, visual, w, True, alloc);

  UnlockDisplay (dpy);
  SyncHandle ();
  return (mid);
}