From d577d991b97ae2b5ee1af23641bcffc3f83af5b2 Mon Sep 17 00:00:00 2001 From: Pixel 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. --- iup/srclua5/il_colorbrowser.c | 73 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 73 insertions(+) create mode 100755 iup/srclua5/il_colorbrowser.c (limited to 'iup/srclua5/il_colorbrowser.c') diff --git a/iup/srclua5/il_colorbrowser.c b/iup/srclua5/il_colorbrowser.c new file mode 100755 index 0000000..f0316dd --- /dev/null +++ b/iup/srclua5/il_colorbrowser.c @@ -0,0 +1,73 @@ +/****************************************************************************** + * Automatically generated file (iuplua5). Please don't change anything. * + *****************************************************************************/ + +#include + +#include +#include + +#include "iup.h" +#include "iuplua.h" +#include "iupcontrols.h" +#include "il.h" + + +static int colorbrowser_drag_cb(Ihandle *self, unsigned char p0, unsigned char p1, unsigned char p2) +{ + lua_State *L = iuplua_call_start(self, "drag_cb"); + lua_pushnumber(L, p0); + lua_pushnumber(L, p1); + lua_pushnumber(L, p2); + return iuplua_call(L, 3); +} + +static int colorbrowser_change_cb(Ihandle *self, unsigned char p0, unsigned char p1, unsigned char p2) +{ + lua_State *L = iuplua_call_start(self, "change_cb"); + lua_pushnumber(L, p0); + lua_pushnumber(L, p1); + lua_pushnumber(L, p2); + return iuplua_call(L, 3); +} + +static int ColorBrowser(lua_State *L) +{ + Ihandle *ih = IupColorBrowser(); + iuplua_plugstate(L, ih); + iuplua_pushihandle_raw(L, ih); + return 1; +} + +int iupcolorbrowserlua_open(lua_State * L) +{ + iuplua_register(L, ColorBrowser, "ColorBrowser"); + + iuplua_register_cb(L, "DRAG_CB", (lua_CFunction)colorbrowser_drag_cb, NULL); + iuplua_register_cb(L, "CHANGE_CB", (lua_CFunction)colorbrowser_change_cb, NULL); + +#ifdef IUPLUA_USELOH +#ifdef TEC_BIGENDIAN +#ifdef TEC_64 +#include "loh/colorbrowser_be64.loh" +#else +#include "loh/colorbrowser_be32.loh" +#endif +#else +#ifdef TEC_64 +#ifdef WIN64 +#include "loh/colorbrowser_le64w.loh" +#else +#include "loh/colorbrowser_le64.loh" +#endif +#else +#include "loh/colorbrowser.loh" +#endif +#endif +#else + iuplua_dofile(L, "colorbrowser.lua"); +#endif + + return 0; +} + -- cgit v1.2.3