diff options
author | cvs2svn | 2005-06-10 10:29:11 +0000 |
---|---|---|
committer | cvs2svn | 2005-06-10 10:29:11 +0000 |
commit | 960cdf29197bc3f5922110cf26627aa9709ac79b (patch) | |
tree | 7d6e4a472376b203d21826c2230b4a8c6a9024bd /Perl/Zinc.xs | |
parent | 3fc9c4bc1d6f70db41ad418992bf3d461059d3c0 (diff) | |
download | tkzinc-960cdf29197bc3f5922110cf26627aa9709ac79b.zip tkzinc-960cdf29197bc3f5922110cf26627aa9709ac79b.tar.gz tkzinc-960cdf29197bc3f5922110cf26627aa9709ac79b.tar.bz2 tkzinc-960cdf29197bc3f5922110cf26627aa9709ac79b.tar.xz |
This commit was manufactured by cvs2svn to create branch 'bogue40'.
Diffstat (limited to 'Perl/Zinc.xs')
-rw-r--r-- | Perl/Zinc.xs | 59 |
1 files changed, 0 insertions, 59 deletions
diff --git a/Perl/Zinc.xs b/Perl/Zinc.xs deleted file mode 100644 index 26cd0c7..0000000 --- a/Perl/Zinc.xs +++ /dev/null @@ -1,59 +0,0 @@ -/* - Copyright (c) 1995-1997 Nick Ing-Simmons. All rights reserved. - This program is free software; you can redistribute it and/or - modify it under the same terms as Perl itself. -*/ - -#include <EXTERN.h> -#include <perl.h> -#include <XSUB.h> - -#include <tkGlue.def> - -#include <pTk/tkPort.h> -#include <pTk/tkInt.h> -#ifdef _WIN32 -#include <pTk/tkWinInt.h> -#endif -#include <pTk/tkImgPhoto.h> -#include <pTk/tkVMacro.h> -#include <tkGlue.h> -#include <tkGlue.m> - -extern int -ZincObjCmd( - ClientData client_data, - Tcl_Interp* interp, - int argc, - Tcl_Obj* CONST args[]); - -extern int -ZnVideomapObjCmd( - ClientData client_data, - Tcl_Interp* interp, - int argc, - Tcl_Obj* CONST args[]); - -extern int -ZnMapInfoObjCmd( - ClientData client_data, - Tcl_Interp* interp, - int argc, - Tcl_Obj* CONST args[]); - -DECLARE_VTABLES; -TkimgphotoVtab *TkimgphotoVptr; - -MODULE = Tk::Zinc PACKAGE = Tk::Zinc - -PROTOTYPES: DISABLE - -BOOT: - { - IMPORT_VTABLES; - TkimgphotoVptr = (TkimgphotoVtab *) SvIV(perl_get_sv("Tk::TkimgphotoVtab",GV_ADDWARN|GV_ADD)); - - Lang_TkCommand("zinc", ZincObjCmd); - Lang_TkCommand("videomap", ZnVideomapObjCmd); - Lang_TkCommand("mapinfo", ZnMapInfoObjCmd); - } |