pkgsrc-ng/print/pdflib/patches/patch-bind_tcl_pdflib__tcl.c
2016-01-21 23:41:46 +01:00

853 lines
26 KiB
C

$NetBSD: patch-bind_tcl_pdflib__tcl.c,v 1.1 2015/06/28 17:11:12 joerg Exp $
--- bind/tcl/pdflib_tcl.c.orig 2002-01-07 18:26:29.000000000 +0000
+++ bind/tcl/pdflib_tcl.c
@@ -39,6 +39,7 @@
* if building with older TCL Versions than 8.2 you have to undef this
*/
#define USE_TCL_STUBS
+#define USE_INTERP_RESULT
#include <tcl.h>
@@ -213,7 +214,7 @@ void SWIG_MakePtr(char *_c, const void *
/* Function for getting a pointer value */
SWIGSTATIC
-char *SWIG_GetPtr(char *_c, void **ptr, char *_t)
+const char *SWIG_GetPtr(const char *_c, void **ptr, char *_t)
{
unsigned long _p;
char temp_type[256];
@@ -397,7 +398,7 @@ pdf_errorhandler(PDF *p, int type, const
/* Issue a warning message and continue for non-fatal errors */
if (type == PDF_NonfatalError) {
- fprintf(stderr, ex->buffer);
+ fprintf(stderr, "%s", ex->buffer);
return;
}
@@ -542,7 +543,7 @@ GetStringUnicodePDFChars(PDF *p, Tcl_Int
#endif
static int
-_wrap_PDF_new(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_new(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
char versionbuf[32];
EXC_STUFF;
@@ -583,7 +584,7 @@ _wrap_PDF_new(ClientData clientData, Tcl
}
static int
-_wrap_PDF_delete(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_delete(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -605,10 +606,10 @@ _wrap_PDF_delete(ClientData clientData,
}
static int
-_wrap_PDF_open_file(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_open_file(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
int _result;
PDF *p;
- char *_arg1;
+ const char *_arg1;
EXC_STUFF;
if (argc != 3) {
@@ -632,7 +633,7 @@ _wrap_PDF_open_file(ClientData clientDat
}
static int
-_wrap_PDF_close(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_close(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -699,7 +700,7 @@ static int _wrap_PDF_get_buffer(ClientDa
}
static int
-_wrap_PDF_begin_page(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_begin_page(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -726,7 +727,7 @@ _wrap_PDF_begin_page(ClientData clientDa
}
static int
-_wrap_PDF_end_page(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_end_page(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -748,10 +749,10 @@ _wrap_PDF_end_page(ClientData clientData
}
static int
-_wrap_PDF_set_parameter(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_set_parameter(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
- char *_arg1;
- char *_arg2;
+ const char *_arg1;
+ const char *_arg2;
EXC_STUFF;
if (argc != 4) {
@@ -784,10 +785,10 @@ _wrap_PDF_set_parameter(ClientData clien
return TCL_OK;
}
-static int _wrap_PDF_get_parameter(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+static int _wrap_PDF_get_parameter(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
char * _result;
PDF *p;
- char *_arg1;
+ const char *_arg1;
float _arg2;
EXC_STUFF;
@@ -812,10 +813,10 @@ static int _wrap_PDF_get_parameter(Clien
}
static int
-_wrap_PDF_set_value(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_set_value(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
- char *_arg1;
+ const char *_arg1;
float _arg2;
EXC_STUFF;
@@ -840,11 +841,11 @@ _wrap_PDF_set_value(ClientData clientDat
}
static int
-_wrap_PDF_get_value(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_get_value(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
float _result;
PDF *p;
- char *_arg1;
+ const char *_arg1;
float _arg2;
EXC_STUFF;
@@ -869,11 +870,11 @@ _wrap_PDF_get_value(ClientData clientDat
}
static int
-_wrap_PDF_findfont(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_findfont(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
int _result;
PDF *p;
- char *_arg1;
- char *_arg2;
+ const char *_arg1;
+ const char *_arg2;
int _arg3;
EXC_STUFF;
@@ -906,7 +907,7 @@ _wrap_PDF_findfont(ClientData clientData
}
static int
-_wrap_PDF_setfont(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setfont(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
int _arg1;
float _arg2;
@@ -1136,7 +1137,7 @@ static int _wrap_PDF_show_boxed(ClientDa
}
static int
-_wrap_PDF_set_text_pos(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_set_text_pos(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1216,7 +1217,7 @@ _wrap_PDF_stringwidth(ClientData clientD
}
static int
-_wrap_PDF_setdash(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setdash(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1295,7 +1296,7 @@ _wrap_PDF_setpolydash(ClientData clientD
}
static int
-_wrap_PDF_setflat(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setflat(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
EXC_STUFF;
@@ -1319,7 +1320,7 @@ _wrap_PDF_setflat(ClientData clientData,
}
static int
-_wrap_PDF_setlinejoin(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setlinejoin(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
int _arg1;
EXC_STUFF;
@@ -1348,7 +1349,7 @@ _wrap_PDF_setlinejoin(ClientData clientD
}
static int
-_wrap_PDF_setlinecap(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setlinecap(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
int _arg1;
EXC_STUFF;
@@ -1377,7 +1378,7 @@ _wrap_PDF_setlinecap(ClientData clientDa
}
static int
-_wrap_PDF_setmiterlimit(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setmiterlimit(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
EXC_STUFF;
@@ -1402,7 +1403,7 @@ _wrap_PDF_setmiterlimit(ClientData clien
}
static int
-_wrap_PDF_setlinewidth(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setlinewidth(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
EXC_STUFF;
@@ -1427,7 +1428,7 @@ _wrap_PDF_setlinewidth(ClientData client
}
static int
-_wrap_PDF_save(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_save(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -1449,7 +1450,7 @@ _wrap_PDF_save(ClientData clientData, Tc
}
static int
-_wrap_PDF_restore(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_restore(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -1471,7 +1472,7 @@ _wrap_PDF_restore(ClientData clientData,
}
static int
-_wrap_PDF_translate(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_translate(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1498,7 +1499,7 @@ _wrap_PDF_translate(ClientData clientDat
}
static int
-_wrap_PDF_scale(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_scale(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1525,7 +1526,7 @@ _wrap_PDF_scale(ClientData clientData, T
}
static int
-_wrap_PDF_rotate(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_rotate(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
EXC_STUFF;
@@ -1550,7 +1551,7 @@ _wrap_PDF_rotate(ClientData clientData,
}
static int
-_wrap_PDF_skew(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_skew(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1576,7 +1577,7 @@ _wrap_PDF_skew(ClientData clientData, Tc
return TCL_OK;
}
-static int _wrap_PDF_concat(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+static int _wrap_PDF_concat(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1613,7 +1614,7 @@ static int _wrap_PDF_concat(ClientData c
}
static int
-_wrap_PDF_moveto(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_moveto(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1640,7 +1641,7 @@ _wrap_PDF_moveto(ClientData clientData,
}
static int
-_wrap_PDF_lineto(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_lineto(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1667,7 +1668,7 @@ _wrap_PDF_lineto(ClientData clientData,
}
static int
-_wrap_PDF_curveto(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_curveto(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1702,7 +1703,7 @@ _wrap_PDF_curveto(ClientData clientData,
}
static int
-_wrap_PDF_circle(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_circle(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1730,7 +1731,7 @@ _wrap_PDF_circle(ClientData clientData,
}
static int
-_wrap_PDF_arc(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_arc(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1763,7 +1764,7 @@ _wrap_PDF_arc(ClientData clientData, Tcl
}
static int
-_wrap_PDF_rect(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_rect(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -1794,7 +1795,7 @@ _wrap_PDF_rect(ClientData clientData, Tc
}
static int
-_wrap_PDF_closepath(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_closepath(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -1816,7 +1817,7 @@ _wrap_PDF_closepath(ClientData clientDat
}
static int
-_wrap_PDF_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_stroke(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -1838,7 +1839,7 @@ _wrap_PDF_stroke(ClientData clientData,
}
static int
-_wrap_PDF_closepath_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_closepath_stroke(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -1860,7 +1861,7 @@ _wrap_PDF_closepath_stroke(ClientData cl
}
static int
-_wrap_PDF_fill(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_fill(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -1882,7 +1883,7 @@ _wrap_PDF_fill(ClientData clientData, Tc
}
static int
-_wrap_PDF_fill_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_fill_stroke(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -1904,7 +1905,7 @@ _wrap_PDF_fill_stroke(ClientData clientD
}
static int
-_wrap_PDF_closepath_fill_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_closepath_fill_stroke(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -1926,7 +1927,7 @@ _wrap_PDF_closepath_fill_stroke(ClientDa
}
static int
-_wrap_PDF_endpath(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_endpath(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -1948,7 +1949,7 @@ _wrap_PDF_endpath(ClientData clientData,
}
static int
-_wrap_PDF_clip(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_clip(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -1970,7 +1971,7 @@ _wrap_PDF_clip(ClientData clientData, Tc
}
static int
-_wrap_PDF_setgray_fill(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setgray_fill(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
EXC_STUFF;
@@ -1995,7 +1996,7 @@ _wrap_PDF_setgray_fill(ClientData client
}
static int
-_wrap_PDF_setgray_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setgray_stroke(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
EXC_STUFF;
@@ -2020,7 +2021,7 @@ _wrap_PDF_setgray_stroke(ClientData clie
}
static int
-_wrap_PDF_setgray(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setgray(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
EXC_STUFF;
@@ -2045,7 +2046,7 @@ _wrap_PDF_setgray(ClientData clientData,
}
static int
-_wrap_PDF_setrgbcolor_fill(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setrgbcolor_fill(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -2074,7 +2075,7 @@ _wrap_PDF_setrgbcolor_fill(ClientData cl
}
static int
-_wrap_PDF_setrgbcolor_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setrgbcolor_stroke(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -2103,7 +2104,7 @@ _wrap_PDF_setrgbcolor_stroke(ClientData
}
static int
-_wrap_PDF_setrgbcolor(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setrgbcolor(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -2132,7 +2133,7 @@ _wrap_PDF_setrgbcolor(ClientData clientD
}
static int
-_wrap_PDF_place_image(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_place_image(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
int _arg1;
float _arg2;
@@ -2171,15 +2172,15 @@ _wrap_PDF_open_image(ClientData clientDa
int _result;
PDF *p;
- char *_arg1;
- char *_arg2;
- char *_arg3;
+ const char *_arg1;
+ const char *_arg2;
+ const char *_arg3;
long _arg4;
int _arg5;
int _arg6;
int _arg7;
int _arg8;
- char *_arg9;
+ const char *_arg9;
int len = 0;
char *res;
EXC_STUFF;
@@ -2269,7 +2270,7 @@ _wrap_PDF_open_image(ClientData clientDa
}
static int
-_wrap_PDF_close_image(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_close_image(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
int _arg1;
EXC_STUFF;
@@ -2298,12 +2299,12 @@ _wrap_PDF_close_image(ClientData clientD
}
static int
-_wrap_PDF_open_image_file(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_open_image_file(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
int _result;
PDF *p;
- char *_arg1;
- char *_arg2;
- char *_arg3;
+ const char *_arg1;
+ const char *_arg2;
+ const char *_arg3;
int _arg4;
EXC_STUFF;
@@ -2335,10 +2336,10 @@ _wrap_PDF_open_image_file(ClientData cli
}
static int
-_wrap_PDF_open_CCITT(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_open_CCITT(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
int _result;
PDF *p;
- char *_arg1;
+ const char *_arg1;
int _arg2;
int _arg3;
int _arg4;
@@ -2490,12 +2491,12 @@ _wrap_PDF_attach_file(ClientData clientD
double _arg2;
double _arg3;
double _arg4;
- char *_arg5;
- char *_arg6;
- char *_arg7;
- char *_arg8;
- char *_arg9;
- char *res;
+ const char *_arg5;
+ const char *_arg6;
+ const char *_arg7;
+ const char *_arg8;
+ const char *_arg9;
+ const char *res;
EXC_STUFF;
if (objc != 11) {
@@ -2573,9 +2574,9 @@ _wrap_PDF_add_note(ClientData clientData
double _arg2;
double _arg3;
double _arg4;
- char *_arg5;
- char *_arg6;
- char *_arg7;
+ const char *_arg5;
+ const char *_arg6;
+ const char *_arg7;
int _arg8;
char *res;
EXC_STUFF;
@@ -2644,15 +2645,15 @@ _wrap_PDF_add_note(ClientData clientData
}
static int
-_wrap_PDF_add_pdflink(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_add_pdflink(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
float _arg3;
float _arg4;
- char *_arg5;
+ const char *_arg5;
int _arg6;
- char *_arg7;
+ const char *_arg7;
EXC_STUFF;
if (argc != 9) {
@@ -2685,13 +2686,13 @@ _wrap_PDF_add_pdflink(ClientData clientD
}
static int
-_wrap_PDF_add_launchlink(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_add_launchlink(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
float _arg3;
float _arg4;
- char *_arg5;
+ const char *_arg5;
EXC_STUFF;
if (argc != 7) {
@@ -2718,14 +2719,14 @@ _wrap_PDF_add_launchlink(ClientData clie
}
static int
-_wrap_PDF_add_locallink(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_add_locallink(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
float _arg3;
float _arg4;
int _arg5;
- char *_arg6;
+ const char *_arg6;
EXC_STUFF;
if (argc != 8) {
@@ -2757,13 +2758,13 @@ _wrap_PDF_add_locallink(ClientData clien
}
static int
-_wrap_PDF_add_weblink(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_add_weblink(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
float _arg3;
float _arg4;
- char *_arg5;
+ const char *_arg5;
EXC_STUFF;
if (argc != 7) {
@@ -2790,9 +2791,9 @@ _wrap_PDF_add_weblink(ClientData clientD
}
static int
-_wrap_PDF_set_border_style(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_set_border_style(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
- char *_arg1;
+ const char *_arg1;
float _arg2;
EXC_STUFF;
@@ -2817,7 +2818,7 @@ _wrap_PDF_set_border_style(ClientData cl
}
static int
-_wrap_PDF_set_border_color(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_set_border_color(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -2846,7 +2847,7 @@ _wrap_PDF_set_border_color(ClientData cl
}
static int
-_wrap_PDF_set_border_dash(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_set_border_dash(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -2872,11 +2873,11 @@ _wrap_PDF_set_border_dash(ClientData cli
return TCL_OK;
}
-static int _wrap_PDF_open_pdi(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+static int _wrap_PDF_open_pdi(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
int _result;
PDF *p;
- char *_arg1;
- char *_arg2;
+ const char *_arg1;
+ const char *_arg2;
int _arg3;
EXC_STUFF;
@@ -2901,7 +2902,7 @@ static int _wrap_PDF_open_pdi(ClientData
}
static int
-_wrap_PDF_close_pdi(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_close_pdi(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
int _arg1;
EXC_STUFF;
@@ -2924,12 +2925,12 @@ _wrap_PDF_close_pdi(ClientData clientDat
}
static int
-_wrap_PDF_open_pdi_page(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_open_pdi_page(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
int _result;
PDF *p;
int _arg1;
int _arg2;
- char *_arg3;
+ const char *_arg3;
EXC_STUFF;
if (argc != 5) {
@@ -2953,7 +2954,7 @@ _wrap_PDF_open_pdi_page(ClientData clien
}
static int
-_wrap_PDF_place_pdi_page(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_place_pdi_page(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
int _arg1;
float _arg2;
@@ -2984,7 +2985,7 @@ _wrap_PDF_place_pdi_page(ClientData clie
}
static int
-_wrap_PDF_close_pdi_page(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_close_pdi_page(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
int _arg1;
EXC_STUFF;
@@ -3007,10 +3008,10 @@ _wrap_PDF_close_pdi_page(ClientData clie
}
static int
-_wrap_PDF_get_pdi_parameter(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_get_pdi_parameter(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
char * _result;
PDF *p;
- char *_arg1;
+ const char *_arg1;
int _arg2;
int _arg3;
int _arg4;
@@ -3040,10 +3041,10 @@ _wrap_PDF_get_pdi_parameter(ClientData c
}
static int
-_wrap_PDF_get_pdi_value(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_get_pdi_value(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
float _result;
PDF *p;
- char *_arg1;
+ const char *_arg1;
int _arg2;
int _arg3;
int _arg4;
@@ -3071,10 +3072,10 @@ _wrap_PDF_get_pdi_value(ClientData clien
}
static int
-_wrap_PDF_makespotcolor(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_makespotcolor(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
int _result;
PDF *p;
- char *_arg1;
+ const char *_arg1;
int _arg2;
EXC_STUFF;
@@ -3098,10 +3099,10 @@ _wrap_PDF_makespotcolor(ClientData clien
}
static int
-_wrap_PDF_setcolor(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setcolor(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
- char *_arg1;
- char *_arg2;
+ const char *_arg1;
+ const char *_arg2;
float _arg3;
float _arg4;
float _arg5;
@@ -3131,7 +3132,7 @@ _wrap_PDF_setcolor(ClientData clientData
}
static int
-_wrap_PDF_begin_pattern(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_begin_pattern(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
int _result;
PDF *p;
float _arg1;
@@ -3164,7 +3165,7 @@ _wrap_PDF_begin_pattern(ClientData clien
}
static int
-_wrap_PDF_end_pattern(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_end_pattern(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -3186,7 +3187,7 @@ _wrap_PDF_end_pattern(ClientData clientD
}
static int
-_wrap_PDF_begin_template(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_begin_template(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
int _result;
PDF *p;
@@ -3214,7 +3215,7 @@ _wrap_PDF_begin_template(ClientData clie
}
static int
-_wrap_PDF_end_template(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_end_template(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;
@@ -3235,7 +3236,7 @@ _wrap_PDF_end_template(ClientData client
return TCL_OK;
}
-static int _wrap_PDF_arcn(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+static int _wrap_PDF_arcn(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
@@ -3267,7 +3268,7 @@ static int _wrap_PDF_arcn(ClientData cli
}
static int
-_wrap_PDF_add_thumbnail(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_add_thumbnail(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
int _arg1;
@@ -3291,7 +3292,7 @@ _wrap_PDF_add_thumbnail(ClientData clien
}
static int
-_wrap_PDF_setmatrix(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_setmatrix(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
float _arg1;
float _arg2;
@@ -3324,7 +3325,7 @@ _wrap_PDF_setmatrix(ClientData clientDat
}
static int
-_wrap_PDF_initgraphics(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) {
+_wrap_PDF_initgraphics(ClientData clientData, Tcl_Interp *interp, int argc, const char *argv[]) {
PDF *p;
EXC_STUFF;