From d577d991b97ae2b5ee1af23641bcffc3f83af5b2 Mon Sep 17 00:00:00 2001
From: Pixel <pixel@nobis-crew.org>
Date: Wed, 4 Nov 2009 11:56:41 -0800
Subject: Initial import. Contains the im, cd and iup librairies, and a
 "working" Makefile for them under linux.

---
 cd/src/lua3/cdluapdf.c | 43 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 43 insertions(+)
 create mode 100755 cd/src/lua3/cdluapdf.c

(limited to 'cd/src/lua3/cdluapdf.c')

diff --git a/cd/src/lua3/cdluapdf.c b/cd/src/lua3/cdluapdf.c
new file mode 100755
index 0000000..1260b91
--- /dev/null
+++ b/cd/src/lua3/cdluapdf.c
@@ -0,0 +1,43 @@
+/** \file
+ * \brief PDF Canvas Lua 3 Binding
+ *
+ * See Copyright Notice in cd.h
+ */
+
+#include <stdlib.h>
+#include <stdio.h>
+
+#include "cd.h"
+#include "cdpdf.h"
+
+#include <lua.h>
+#include <lauxlib.h>
+
+#include "cdlua.h"
+#include "cdluapdf.h"
+#include "cdlua3_private.h"
+
+static void *cdpdf_checkdata(int param)
+{
+  lua_Object data = lua_getparam(param);
+  if (!lua_isstring(data))
+    lua_error("cdCreateCanvas CD_PDF: data should be of type string!");
+
+  return lua_getstring(data);
+}
+
+static cdContextLUA cdluapdfctx = 
+{
+  0,
+  "CD_PDF",
+  cdContextPDF,
+  cdpdf_checkdata,
+  NULL,
+  0
+};
+
+void cdluapdf_open(void)
+{
+  cdlua_addcontext(&cdluapdfctx);
+}
+
-- 
cgit v1.2.3