summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl0/lib/Imager/include/plug.h
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl0/lib/Imager/include/plug.h')
-rwxr-xr-xMaster/tlpkg/tlperl0/lib/Imager/include/plug.h42
1 files changed, 42 insertions, 0 deletions
diff --git a/Master/tlpkg/tlperl0/lib/Imager/include/plug.h b/Master/tlpkg/tlperl0/lib/Imager/include/plug.h
new file mode 100755
index 00000000000..e3583fca2cc
--- /dev/null
+++ b/Master/tlpkg/tlperl0/lib/Imager/include/plug.h
@@ -0,0 +1,42 @@
+#include "imager.h"
+
+/* structures for passing data between Imager-plugin and the Imager-module */
+
+#include "ext.h"
+
+
+#define getINT(k,s) (util_table->getint(INP,k,s))
+#define getDOUBLE(k,s) (util_table->getdouble(INP,k,s))
+#define getVOID(k,s) (util_table->getvoid(INP,k,(void**)s))
+#define getSTR(k,s) (util_table->getstr(INP,k,(char**)s))
+#define getOBJ(k,t,s) (util_table->getobj(INP,k,t,(void**)s))
+
+#define i_color_set(cl,r,g,b,a) (symbol_table->i_color_set(cl,r,g,b,a))
+#define i_color_info(cl) (symbol_table->i_color_info(cl))
+
+#define i_img_new() (symbol_table->i_img_new())
+#define i_img_empty(im,x,y) ((symbol_table->i_img_empty(im,x,y))
+#define i_img_empty_ch(im,x,y,ch) ((symbol_table->i_img_empty_ch(im,x,y,ch))
+#define i_img_exorcise(im) (symbol_table->i_img_exorcise(im))
+#define i_img_info(im,info) (symbol_table->i_img_info(im,info))
+
+#define i_img_setmask(im,ch_mask) (symbol_table->i_img_setmask(im,ch_mask))
+#define i_img_getmask(im) (symbol_table->i_img_getmask(im))
+
+/*
+Not needed? The i_gpix() macro in image.h will call the right function
+directly.
+#define i_ppix(im,x,y,val) (symbol_table->i_ppix(im,x,y,val))
+#define i_gpix(im,x,y,val) (symbol_table->i_gpix(im,x,y,val))
+*/
+
+#define i_box(im, x1, y1, x2, y2,val) (symbol_table->i_box(im, x1, y1, x2, y2,val))
+#define i_draw(im, x1, y1, x2, y2,val) (symbol_table->i_draw(im, x1, y1, x2, y2,val))
+#define i_arc(im, x, y, rad, d1, d2,val) (symbol_table->i_arc(im, x, y, rad, d1, d2,val))
+#define i_copyto(im,src, x1, y1, x2, y2, tx, ty,trans) (symbol_table->i_copyto(im,src, x1, y1, x2, y2, tx, ty,trans))
+#define i_rubthru(im,src, tx, ty) (symbol_table->i_rubthru(im,src, tx, ty))
+
+#ifdef WIN32
+extern char __declspec(dllexport) evalstr[];
+extern func_ptr __declspec(dllexport) function_list[];
+#endif