From fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4 Mon Sep 17 00:00:00 2001
From: Joseph Hunkeler <jhunkeler@gmail.com>
Date: Wed, 8 Jul 2015 20:46:52 -0400
Subject: Initial commit

---
 vendor/x11iraf/xpm/XpmCrBufFrP.c | 48 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 48 insertions(+)
 create mode 100644 vendor/x11iraf/xpm/XpmCrBufFrP.c

(limited to 'vendor/x11iraf/xpm/XpmCrBufFrP.c')

diff --git a/vendor/x11iraf/xpm/XpmCrBufFrP.c b/vendor/x11iraf/xpm/XpmCrBufFrP.c
new file mode 100644
index 00000000..192f8b60
--- /dev/null
+++ b/vendor/x11iraf/xpm/XpmCrBufFrP.c
@@ -0,0 +1,48 @@
+/* Copyright 1990-93 GROUPE BULL -- See license conditions in file COPYRIGHT */
+/*****************************************************************************\
+* XpmCrBufFrP.c:                                                              *
+*                                                                             *
+*  XPM library                                                                *
+*  Scan a pixmap and possibly its mask and create an XPM buffer               *
+*                                                                             *
+*  Developed by Arnaud Le Hors                                                *
+\*****************************************************************************/
+
+#include "xpmP.h"
+#ifdef VMS
+#include "sys$library:string.h"
+#else
+#if defined(SYSV) || defined(SVR4)
+#include <string.h>
+#else
+#include <strings.h>
+#endif
+#endif
+
+int
+XpmCreateBufferFromPixmap(display, buffer_return, pixmap, shapemask,
+			  attributes)
+    Display *display;
+    char **buffer_return;
+    Pixmap pixmap;
+    Pixmap shapemask;
+    XpmAttributes *attributes;
+{
+    int ErrorStatus;
+    XpmImage image;
+
+    /*
+     * get the XpmImage
+     */
+    ErrorStatus = XpmCreateXpmImageFromPixmap(display, pixmap, shapemask,
+					      &image, attributes);
+    if (ErrorStatus == XpmSuccess) {
+	/*
+	 * create the buffer from the XpmImage
+	 */
+	ErrorStatus = XpmCreateBufferFromXpmImage(buffer_return, &image,
+						  attributes, NULL);
+	XpmFreeXpmImage(&image);
+    }
+    return (ErrorStatus);
+}
-- 
cgit