/* * FILE : pdftcl_wrap.c * * This file was automatically generated by : * Simplified Wrapper and Interface Generator (SWIG) * Version 1.1 (Patch 5) * * Portions Copyright (c) 1995-1998 * The University of Utah and The Regents of the University of California. * Permission is granted to distribute this file in any manner provided * this notice remains intact. * * Do not make changes to this file--changes will be lost! * */ #define SWIGCODE /* Implementation : TCL 7.x */ #define INCLUDE_TCL #define INCLUDE_TK #include INCLUDE_TCL #include #include #define SWIGTCL /* * $Header: /b2/dmb/SWIG/SWIG1.0b3/swig_lib/tcl/RCS/swigtcl.cfg,v 1.1 1996/05/22 19:47:45 beazley Exp $ * * swigtcl.cfg * * This file is modified from a platform independent file provided * by Sun. With any luck this will allow SWIG generated wrapper * files to work on Unix, Windows, and Macintosh. * * Revision History * $Log: swigtcl.cfg,v $ * Revision 1.1 1996/05/22 19:47:45 beazley * Initial revision * * * -- Dave Beazley, May 2, 1996. * * This file is an example of a Tcl dynamically loadable extension. * * Copyright (c) 1996 by Sun Microsystems, Inc. * * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * */ #if defined(__WIN32__) # define WIN32_LEAN_AND_MEAN # include # undef WIN32_LEAN_AND_MEAN /* * VC++ has an alternate entry point called DllMain, so we need to rename * our entry point. */ # if defined(_MSC_VER) # define SWIGEXPORT(a,b) __declspec(dllexport) a b # define DllEntryPoint DllMain # else # if defined(__BORLANDC__) # define SWIGEXPORT(a,b) a _export b # else # define SWIGEXPORT(a,b) a b # endif # endif #else # define SWIGEXPORT(a,b) a b #endif /* *---------------------------------------------------------------------- * * DllEntryPoint -- * * This wrapper function is used by Windows to invoke the * initialization code for the DLL. If we are compiling * with Visual C++, this routine will be renamed to DllMain. * routine. * * Results: * Returns TRUE; * * Side effects: * None. * *---------------------------------------------------------------------- */ #ifdef __WIN32__ BOOL APIENTRY DllEntryPoint(HINSTANCE hInst, DWORD reason, LPVOID reserved) { return TRUE; } #endif /***************************************************************************** * $Header:$ * * swigptr.swg * * This file contains supporting code for the SWIG run-time type checking * mechanism. The following functions are available : * * SWIG_RegisterMapping(char *origtype, char *newtype, void *(*cast)(void *)); * * Registers a new type-mapping with the type-checker. origtype is the * original datatype and newtype is an equivalent type. cast is optional * pointer to a function to cast pointer values between types (this * is typically used to cast pointers from derived classes to base classes in C++) * * SWIG_MakePtr(char *buffer, void *ptr, char *typestring); * * Makes a pointer string from a pointer and typestring. The result is returned * in buffer which is assumed to hold enough space for the result. * * char * SWIG_GetPtr(char *buffer, void **ptr, char *type) * * Gets a pointer value from a string. If there is a type-mismatch, returns * a character string to the received type. On success, returns NULL. * * * You can remap these functions by making a file called "swigptr.swg" in * your the same directory as the interface file you are wrapping. * * These functions are normally declared static, but this file can be * can be used in a multi-module environment by redefining the symbol * SWIGSTATIC. *****************************************************************************/ #include #ifdef SWIG_GLOBAL #ifdef __cplusplus #define SWIGSTATIC extern "C" #else #define SWIGSTATIC #endif #endif #ifndef SWIGSTATIC #define SWIGSTATIC static #endif /* SWIG pointer structure */ typedef struct SwigPtrType { char *name; /* Datatype name */ int len; /* Length (used for optimization) */ void *(*cast)(void *); /* Pointer casting function */ struct SwigPtrType *next; /* Linked list pointer */ } SwigPtrType; /* Pointer cache structure */ typedef struct { int stat; /* Status (valid) bit */ SwigPtrType *tp; /* Pointer to type structure */ char name[256]; /* Given datatype name */ char mapped[256]; /* Equivalent name */ } SwigCacheType; /* Some variables */ static int SwigPtrMax = 64; /* Max entries that can be currently held */ /* This value may be adjusted dynamically */ static int SwigPtrN = 0; /* Current number of entries */ static int SwigPtrSort = 0; /* Status flag indicating sort */ static int SwigStart[256]; /* Starting positions of types */ /* Pointer table */ static SwigPtrType *SwigPtrTable = 0; /* Table containing pointer equivalences */ /* Cached values */ #define SWIG_CACHESIZE 8 #define SWIG_CACHEMASK 0x7 static SwigCacheType SwigCache[SWIG_CACHESIZE]; static int SwigCacheIndex = 0; static int SwigLastCache = 0; /* Sort comparison function */ static int swigsort(const void *data1, const void *data2) { SwigPtrType *d1 = (SwigPtrType *) data1; SwigPtrType *d2 = (SwigPtrType *) data2; return strcmp(d1->name,d2->name); } /* Binary Search function */ static int swigcmp(const void *key, const void *data) { char *k = (char *) key; SwigPtrType *d = (SwigPtrType *) data; return strncmp(k,d->name,d->len); } /* Register a new datatype with the type-checker */ SWIGSTATIC void SWIG_RegisterMapping(char *origtype, char *newtype, void *(*cast)(void *)) { int i; SwigPtrType *t = 0,*t1; /* Allocate the pointer table if necessary */ if (!SwigPtrTable) { SwigPtrTable = (SwigPtrType *) malloc(SwigPtrMax*sizeof(SwigPtrType)); SwigPtrN = 0; } /* Grow the table */ if (SwigPtrN >= SwigPtrMax) { SwigPtrMax = 2*SwigPtrMax; SwigPtrTable = (SwigPtrType *) realloc((char *) SwigPtrTable,SwigPtrMax*sizeof(SwigPtrType)); } for (i = 0; i < SwigPtrN; i++) if (strcmp(SwigPtrTable[i].name,origtype) == 0) { t = &SwigPtrTable[i]; break; } if (!t) { t = &SwigPtrTable[SwigPtrN]; t->name = origtype; t->len = strlen(t->name); t->cast = 0; t->next = 0; SwigPtrN++; } /* Check for existing entry */ while (t->next) { if ((strcmp(t->name,newtype) == 0)) { if (cast) t->cast = cast; return; } t = t->next; } /* Now place entry (in sorted order) */ t1 = (SwigPtrType *) malloc(sizeof(SwigPtrType)); t1->name = newtype; t1->len = strlen(t1->name); t1->cast = cast; t1->next = 0; t->next = t1; SwigPtrSort = 0; } /* Make a pointer value string */ SWIGSTATIC void SWIG_MakePtr(char *_c, const void *_ptr, char *type) { static char _hex[16] = {'0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'a', 'b', 'c', 'd', 'e', 'f'}; unsigned long _p, _s; char _result[20], *_r; /* Note : a 64-bit hex number = 16 digits */ _r = _result; _p = (unsigned long) _ptr; if (_p > 0) { while (_p > 0) { _s = _p & 0xf; *(_r++) = _hex[_s]; _p = _p >> 4; } *_r = '_'; while (_r >= _result) *(_c++) = *(_r--); } else { strcpy (_c, "NULL"); } if (_ptr) strcpy (_c, type); } /* Define for backwards compatibility */ #define _swig_make_hex SWIG_MakePtr /* Function for getting a pointer value */ SWIGSTATIC char *SWIG_GetPtr(char *_c, void **ptr, char *_t) { unsigned long _p; char temp_type[256]; char *name; int i, len; SwigPtrType *sp,*tp; SwigCacheType *cache; int start, end; _p = 0; /* Pointer values must start with leading underscore */ if (*_c == '_') { _c++; /* Extract hex value from pointer */ while (*_c) { if ((*_c >= '0') && (*_c <= '9')) _p = (_p << 4) + (*_c - '0'); else if ((*_c >= 'a') && (*_c <= 'f')) _p = (_p << 4) + ((*_c - 'a') + 10); else break; _c++; } if (_t) { if (strcmp(_t,_c)) { if (!SwigPtrSort) { qsort((void *) SwigPtrTable, SwigPtrN, sizeof(SwigPtrType), swigsort); for (i = 0; i < 256; i++) { SwigStart[i] = SwigPtrN; } for (i = SwigPtrN-1; i >= 0; i--) { SwigStart[(int) (SwigPtrTable[i].name[1])] = i; } for (i = 255; i >= 1; i--) { if (SwigStart[i-1] > SwigStart[i]) SwigStart[i-1] = SwigStart[i]; } SwigPtrSort = 1; for (i = 0; i < SWIG_CACHESIZE; i++) SwigCache[i].stat = 0; } /* First check cache for matches. Uses last cache value as starting point */ cache = &SwigCache[SwigLastCache]; for (i = 0; i < SWIG_CACHESIZE; i++) { if (cache->stat) { if (strcmp(_t,cache->name) == 0) { if (strcmp(_c,cache->mapped) == 0) { cache->stat++; *ptr = (void *) _p; if (cache->tp->cast) *ptr = (*(cache->tp->cast))(*ptr); return (char *) 0; } } } SwigLastCache = (SwigLastCache+1) & SWIG_CACHEMASK; if (!SwigLastCache) cache = SwigCache; else cache++; } /* We have a type mismatch. Will have to look through our type mapping table to figure out whether or not we can accept this datatype */ start = SwigStart[(int) _t[1]]; end = SwigStart[(int) _t[1]+1]; sp = &SwigPtrTable[start]; while (start < end) { if (swigcmp(_t,sp) == 0) break; sp++; start++; } if (start >= end) sp = 0; /* Try to find a match for this */ if (sp) { while (swigcmp(_t,sp) == 0) { name = sp->name; len = sp->len; tp = sp->next; /* Try to find entry for our given datatype */ while(tp) { if (tp->len >= 255) { return _c; } strcpy(temp_type,tp->name); strncat(temp_type,_t+len,255-tp->len); if (strcmp(_c,temp_type) == 0) { strcpy(SwigCache[SwigCacheIndex].mapped,_c); strcpy(SwigCache[SwigCacheIndex].name,_t); SwigCache[SwigCacheIndex].stat = 1; SwigCache[SwigCacheIndex].tp = tp; SwigCacheIndex = SwigCacheIndex & SWIG_CACHEMASK; /* Get pointer value */ *ptr = (void *) _p; if (tp->cast) *ptr = (*(tp->cast))(*ptr); return (char *) 0; } tp = tp->next; } sp++; /* Hmmm. Didn't find it this time */ } } /* Didn't find any sort of match for this data. Get the pointer value and return the received type */ *ptr = (void *) _p; return _c; } else { /* Found a match on the first try. Return pointer value */ *ptr = (void *) _p; return (char *) 0; } } else { /* No type specified. Good luck */ *ptr = (void *) _p; return (char *) 0; } } else { if (strcmp (_c, "NULL") == 0) { *ptr = (void *) 0; return (char *) 0; } *ptr = (void *) 0; return _c; } } /* Compatibility mode */ #define _swig_get_hex SWIG_GetPtr #define SWIG_init Pdflib_Init #define SWIG_name "pdflib" #define SWIG_prefix "" #define SWIG_namespace "" #ifdef __cplusplus extern "C" { #endif #ifdef MAC_TCL #pragma export on #endif SWIGEXPORT(int,Pdflib_Init)(Tcl_Interp *); #ifdef MAC_TCL #pragma export off #endif #ifdef __cplusplus } #endif #include "pdf.h" static char * _wrap_const_PDFLIB_VERSION = "PDFlib V0.6 (C) Thomas Merz 1997-98"; static char * _wrap_const_PDF_DEFAULT_FONT_PATH = "./fonts"; static int _wrap_const_false = 0; static int _wrap_const_true = 1; static int _wrap_const_PDF_INFO = 1; static int _wrap_const_PDF_WARN = 2; static int _wrap_const_PDF_FATAL = 3; static int _wrap_const_PDF_INTERNAL = 4; static int _wrap_const_PDF1_0 = PDF1_0; static int _wrap_const_PDF1_1 = PDF1_1; static int _wrap_const_PDF1_2 = PDF1_2; static int _wrap_const_builtin = builtin; static int _wrap_const_pdfdoc = pdfdoc; static int _wrap_const_macroman = macroman; static int _wrap_const_macexpert = macexpert; static int _wrap_const_winansi = winansi; static int _wrap_const_encoding_count = encoding_count; static int _wrap_const_none = none; static int _wrap_const_lzw = lzw; static int _wrap_const_runlength = runlength; static int _wrap_const_ccitt = ccitt; static int _wrap_const_dct = dct; static int _wrap_const_flate = flate; static int _wrap_const_compression_count = compression_count; static int _wrap_const_trans_none = trans_none; static int _wrap_const_trans_split = trans_split; static int _wrap_const_trans_blinds = trans_blinds; static int _wrap_const_trans_box = trans_box; static int _wrap_const_trans_wipe = trans_wipe; static int _wrap_const_trans_dissolve = trans_dissolve; static int _wrap_const_trans_glitter = trans_glitter; static int _wrap_const_trans_replace = trans_replace; static int _wrap_const_transition_count = transition_count; static int _wrap_const_DeviceGray = DeviceGray; static int _wrap_const_DeviceRGB = DeviceRGB; static int _wrap_const_DeviceCMYK = DeviceCMYK; static int _wrap_const_CalGray = CalGray; static int _wrap_const_CalRGB = CalRGB; static int _wrap_const_Lab = Lab; static int _wrap_const_Indexed = Indexed; static int _wrap_const_Pattern = Pattern; static int _wrap_const_Separation = Separation; static int _wrap_const_colorspace_count = colorspace_count; extern PDF_pagesize a0; static PDF_pagesize * a0_set(PDF_pagesize * val) { a0 = *(val); return (PDF_pagesize *) &a0; } static PDF_pagesize * a0_get() { return (PDF_pagesize *) &a0; } extern PDF_pagesize a1; static PDF_pagesize * a1_set(PDF_pagesize * val) { a1 = *(val); return (PDF_pagesize *) &a1; } static PDF_pagesize * a1_get() { return (PDF_pagesize *) &a1; } extern PDF_pagesize a2; static PDF_pagesize * a2_set(PDF_pagesize * val) { a2 = *(val); return (PDF_pagesize *) &a2; } static PDF_pagesize * a2_get() { return (PDF_pagesize *) &a2; } extern PDF_pagesize a3; static PDF_pagesize * a3_set(PDF_pagesize * val) { a3 = *(val); return (PDF_pagesize *) &a3; } static PDF_pagesize * a3_get() { return (PDF_pagesize *) &a3; } extern PDF_pagesize a4; static PDF_pagesize * a4_set(PDF_pagesize * val) { a4 = *(val); return (PDF_pagesize *) &a4; } static PDF_pagesize * a4_get() { return (PDF_pagesize *) &a4; } extern PDF_pagesize a5; static PDF_pagesize * a5_set(PDF_pagesize * val) { a5 = *(val); return (PDF_pagesize *) &a5; } static PDF_pagesize * a5_get() { return (PDF_pagesize *) &a5; } extern PDF_pagesize a6; static PDF_pagesize * a6_set(PDF_pagesize * val) { a6 = *(val); return (PDF_pagesize *) &a6; } static PDF_pagesize * a6_get() { return (PDF_pagesize *) &a6; } extern PDF_pagesize b5; static PDF_pagesize * b5_set(PDF_pagesize * val) { b5 = *(val); return (PDF_pagesize *) &b5; } static PDF_pagesize * b5_get() { return (PDF_pagesize *) &b5; } extern PDF_pagesize letter; static PDF_pagesize * letter_set(PDF_pagesize * val) { letter = *(val); return (PDF_pagesize *) &letter; } static PDF_pagesize * letter_get() { return (PDF_pagesize *) &letter; } extern PDF_pagesize legal; static PDF_pagesize * legal_set(PDF_pagesize * val) { legal = *(val); return (PDF_pagesize *) &legal; } static PDF_pagesize * legal_get() { return (PDF_pagesize *) &legal; } extern PDF_pagesize ledger; static PDF_pagesize * ledger_set(PDF_pagesize * val) { ledger = *(val); return (PDF_pagesize *) &ledger; } static PDF_pagesize * ledger_get() { return (PDF_pagesize *) &ledger; } extern PDF_pagesize p11x17; static PDF_pagesize * p11x17_set(PDF_pagesize * val) { p11x17 = *(val); return (PDF_pagesize *) &p11x17; } static PDF_pagesize * p11x17_get() { return (PDF_pagesize *) &p11x17; } static char * _wrap_const_PDF_info_Producer = "PDF_info::Producer"; static int _wrap_a0_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. a0_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of a0_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)a0_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a0_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. a0_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)a0_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a1_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. a1_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of a1_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)a1_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a1_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. a1_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)a1_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a2_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. a2_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of a2_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)a2_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a2_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. a2_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)a2_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a3_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. a3_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of a3_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)a3_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a3_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. a3_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)a3_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a4_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. a4_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of a4_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)a4_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a4_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. a4_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)a4_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a5_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. a5_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of a5_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)a5_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a5_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. a5_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)a5_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a6_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. a6_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of a6_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)a6_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_a6_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. a6_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)a6_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_b5_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. b5_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of b5_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)b5_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_b5_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. b5_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)b5_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_letter_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. letter_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of letter_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)letter_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_letter_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. letter_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)letter_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_legal_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. legal_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of legal_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)legal_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_legal_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. legal_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)legal_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_ledger_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. ledger_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of ledger_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)ledger_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_ledger_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. ledger_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)ledger_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_p11x17_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. p11x17_set { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of p11x17_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_pagesize *)p11x17_set(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_p11x17_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_pagesize * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. p11x17_get ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_pagesize *)p11x17_get(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_pagesize_p"); return TCL_OK; } static int _wrap_PDF_get_info(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_info * _result; clientData = clientData; argv = argv; if ((argc < 1) || (argc > 1)) { Tcl_SetResult(interp, "Wrong # args. PDF_get_info ",TCL_STATIC); return TCL_ERROR; } _result = (PDF_info *)PDF_get_info(); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_info_p"); return TCL_OK; } static int _wrap_PDF_open(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _result; FILE * _arg0; PDF_info * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_open fp info ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_FILE_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_open. Expected _FILE_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_open. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _result = (PDF *)PDF_open(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_p"); return TCL_OK; } static int _wrap_PDF_close(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_close p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_close. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_close(_arg0); return TCL_OK; } static int _wrap_PDF_begin_page(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; clientData = clientData; argv = argv; if ((argc < 4) || (argc > 4)) { Tcl_SetResult(interp, "Wrong # args. PDF_begin_page p height width ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_begin_page. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); PDF_begin_page(_arg0,_arg1,_arg2); return TCL_OK; } static int _wrap_PDF_end_page(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_end_page p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_end_page. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_end_page(_arg0); return TCL_OK; } static int _wrap_PDF_set_transition(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; PDF_transition _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_set_transition p t ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_set_transition. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (PDF_transition ) atol(argv[2]); PDF_set_transition(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_set_duration(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_set_duration p t ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_set_duration. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_set_duration(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_malloc(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { void * _result; size_t * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_malloc size caller ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_size_t_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_malloc. Expected _size_t_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (void *)PDF_malloc(*_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_void_p"); return TCL_OK; } static int _wrap_PDF_free(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { void * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_free mem ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,(char *) 0)) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_free. Expected _void_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_free(_arg0); return TCL_OK; } static int _wrap_PDF_show(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_show p text ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_show. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; PDF_show(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_show_xy(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; char * _arg1; float _arg2; float _arg3; clientData = clientData; argv = argv; if ((argc < 5) || (argc > 5)) { Tcl_SetResult(interp, "Wrong # args. PDF_show_xy p text x y ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_show_xy. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _arg2 = (float ) atof(argv[3]); _arg3 = (float ) atof(argv[4]); PDF_show_xy(_arg0,_arg1,_arg2,_arg3); return TCL_OK; } static int _wrap_PDF_set_font(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; char * _arg1; float _arg2; PDF_encoding _arg3; clientData = clientData; argv = argv; if ((argc < 5) || (argc > 5)) { Tcl_SetResult(interp, "Wrong # args. PDF_set_font p fontname fontsize enc ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_set_font. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _arg2 = (float ) atof(argv[3]); _arg3 = (PDF_encoding ) atol(argv[4]); PDF_set_font(_arg0,_arg1,_arg2,_arg3); return TCL_OK; } static int _wrap_PDF_set_leading(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_set_leading p l ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_set_leading. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_set_leading(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_set_text_rise(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_set_text_rise p rise ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_set_text_rise. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_set_text_rise(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_set_horiz_scaling(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_set_horiz_scaling p scale ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_set_horiz_scaling. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_set_horiz_scaling(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_set_text_rendering(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; byte _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_set_text_rendering p mode ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_set_text_rendering. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (byte ) strtoul(argv[2],(char **) NULL,0); PDF_set_text_rendering(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_set_text_matrix(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; PDF_matrix * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_set_text_matrix p m ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_set_text_matrix. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_set_text_matrix. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } PDF_set_text_matrix(_arg0,*_arg1); return TCL_OK; } static int _wrap_PDF_set_text_pos(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; clientData = clientData; argv = argv; if ((argc < 4) || (argc > 4)) { Tcl_SetResult(interp, "Wrong # args. PDF_set_text_pos p x y ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_set_text_pos. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); PDF_set_text_pos(_arg0,_arg1,_arg2); return TCL_OK; } static int _wrap_PDF_set_char_spacing(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_set_char_spacing p spacing ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_set_char_spacing. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_set_char_spacing(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_set_word_spacing(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_set_word_spacing p spacing ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_set_word_spacing. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_set_word_spacing(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_continue_text(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_continue_text p text ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_continue_text. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; PDF_continue_text(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_save(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_save p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_save. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_save(_arg0); return TCL_OK; } static int _wrap_PDF_restore(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_restore p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_restore. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_restore(_arg0); return TCL_OK; } static int _wrap_PDF_translate(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; clientData = clientData; argv = argv; if ((argc < 4) || (argc > 4)) { Tcl_SetResult(interp, "Wrong # args. PDF_translate p tx ty ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_translate. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); PDF_translate(_arg0,_arg1,_arg2); return TCL_OK; } static int _wrap_PDF_scale(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; clientData = clientData; argv = argv; if ((argc < 4) || (argc > 4)) { Tcl_SetResult(interp, "Wrong # args. PDF_scale p sx sy ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_scale. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); PDF_scale(_arg0,_arg1,_arg2); return TCL_OK; } static int _wrap_PDF_rotate(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_rotate p phi ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_rotate. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_rotate(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_setdash(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; clientData = clientData; argv = argv; if ((argc < 4) || (argc > 4)) { Tcl_SetResult(interp, "Wrong # args. PDF_setdash p d1 d2 ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setdash. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); PDF_setdash(_arg0,_arg1,_arg2); return TCL_OK; } static int _wrap_PDF_setpolydash(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float * _arg1; int _arg2; clientData = clientData; argv = argv; if ((argc < 4) || (argc > 4)) { Tcl_SetResult(interp, "Wrong # args. PDF_setpolydash p darray length ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setpolydash. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_float_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_setpolydash. Expected _float_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _arg2 = (int ) atol(argv[3]); PDF_setpolydash(_arg0,_arg1,_arg2); return TCL_OK; } static int _wrap_PDF_setflat(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_setflat p flat ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setflat. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_setflat(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_setlinejoin(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; byte _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_setlinejoin p join ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setlinejoin. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (byte ) strtoul(argv[2],(char **) NULL,0); PDF_setlinejoin(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_setlinecap(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; byte _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_setlinecap p cap ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setlinecap. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (byte ) strtoul(argv[2],(char **) NULL,0); PDF_setlinecap(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_setmiterlimit(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_setmiterlimit p miter ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setmiterlimit. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_setmiterlimit(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_setlinewidth(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_setlinewidth p width ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setlinewidth. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_setlinewidth(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_setgray_fill(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_setgray_fill p g ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setgray_fill. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_setgray_fill(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_setgray_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_setgray_stroke p g ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setgray_stroke. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_setgray_stroke(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_setgray(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_setgray p g ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setgray. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); PDF_setgray(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_setrgbcolor_fill(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; float _arg3; clientData = clientData; argv = argv; if ((argc < 5) || (argc > 5)) { Tcl_SetResult(interp, "Wrong # args. PDF_setrgbcolor_fill p red green blue ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setrgbcolor_fill. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); _arg3 = (float ) atof(argv[4]); PDF_setrgbcolor_fill(_arg0,_arg1,_arg2,_arg3); return TCL_OK; } static int _wrap_PDF_setrgbcolor_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; float _arg3; clientData = clientData; argv = argv; if ((argc < 5) || (argc > 5)) { Tcl_SetResult(interp, "Wrong # args. PDF_setrgbcolor_stroke p red green blue ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setrgbcolor_stroke. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); _arg3 = (float ) atof(argv[4]); PDF_setrgbcolor_stroke(_arg0,_arg1,_arg2,_arg3); return TCL_OK; } static int _wrap_PDF_setrgbcolor(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; float _arg3; clientData = clientData; argv = argv; if ((argc < 5) || (argc > 5)) { Tcl_SetResult(interp, "Wrong # args. PDF_setrgbcolor p red green blue ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_setrgbcolor. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); _arg3 = (float ) atof(argv[4]); PDF_setrgbcolor(_arg0,_arg1,_arg2,_arg3); return TCL_OK; } static int _wrap_PDF_moveto(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; clientData = clientData; argv = argv; if ((argc < 4) || (argc > 4)) { Tcl_SetResult(interp, "Wrong # args. PDF_moveto p x y ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_moveto. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); PDF_moveto(_arg0,_arg1,_arg2); return TCL_OK; } static int _wrap_PDF_lineto(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; clientData = clientData; argv = argv; if ((argc < 4) || (argc > 4)) { Tcl_SetResult(interp, "Wrong # args. PDF_lineto p x y ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_lineto. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); PDF_lineto(_arg0,_arg1,_arg2); return TCL_OK; } static int _wrap_PDF_curveto(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; float _arg3; float _arg4; float _arg5; float _arg6; clientData = clientData; argv = argv; if ((argc < 8) || (argc > 8)) { Tcl_SetResult(interp, "Wrong # args. PDF_curveto p x1 y1 x2 y2 x3 y3 ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_curveto. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); _arg3 = (float ) atof(argv[4]); _arg4 = (float ) atof(argv[5]); _arg5 = (float ) atof(argv[6]); _arg6 = (float ) atof(argv[7]); PDF_curveto(_arg0,_arg1,_arg2,_arg3,_arg4,_arg5,_arg6); return TCL_OK; } static int _wrap_PDF_circle(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; float _arg3; clientData = clientData; argv = argv; if ((argc < 5) || (argc > 5)) { Tcl_SetResult(interp, "Wrong # args. PDF_circle p x y r ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_circle. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); _arg3 = (float ) atof(argv[4]); PDF_circle(_arg0,_arg1,_arg2,_arg3); return TCL_OK; } static int _wrap_PDF_arc(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; float _arg3; float _arg4; float _arg5; clientData = clientData; argv = argv; if ((argc < 7) || (argc > 7)) { Tcl_SetResult(interp, "Wrong # args. PDF_arc p x y r alpha1 alpha2 ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_arc. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); _arg3 = (float ) atof(argv[4]); _arg4 = (float ) atof(argv[5]); _arg5 = (float ) atof(argv[6]); PDF_arc(_arg0,_arg1,_arg2,_arg3,_arg4,_arg5); return TCL_OK; } static int _wrap_PDF_rect(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; float _arg1; float _arg2; float _arg3; float _arg4; clientData = clientData; argv = argv; if ((argc < 6) || (argc > 6)) { Tcl_SetResult(interp, "Wrong # args. PDF_rect p x y width height ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_rect. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _arg2 = (float ) atof(argv[3]); _arg3 = (float ) atof(argv[4]); _arg4 = (float ) atof(argv[5]); PDF_rect(_arg0,_arg1,_arg2,_arg3,_arg4); return TCL_OK; } static int _wrap_PDF_closepath(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_closepath p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_closepath. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_closepath(_arg0); return TCL_OK; } static int _wrap_PDF_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_stroke p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_stroke. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_stroke(_arg0); return TCL_OK; } static int _wrap_PDF_closepath_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_closepath_stroke p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_closepath_stroke. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_closepath_stroke(_arg0); return TCL_OK; } static int _wrap_PDF_fill(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_fill p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_fill. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_fill(_arg0); return TCL_OK; } static int _wrap_PDF_fill_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_fill_stroke p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_fill_stroke. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_fill_stroke(_arg0); return TCL_OK; } static int _wrap_PDF_closepath_fill_stroke(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_closepath_fill_stroke p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_closepath_fill_stroke. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_closepath_fill_stroke(_arg0); return TCL_OK; } static int _wrap_PDF_endpath(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_endpath p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_endpath. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_endpath(_arg0); return TCL_OK; } static int _wrap_PDF_clip(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_clip p ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_clip. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } PDF_clip(_arg0); return TCL_OK; } static int _wrap_PDF_place_image(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; PDF_image * _arg1; float _arg2; float _arg3; float _arg4; clientData = clientData; argv = argv; if ((argc < 6) || (argc > 6)) { Tcl_SetResult(interp, "Wrong # args. PDF_place_image p image x y scale ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_place_image. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_place_image. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _arg2 = (float ) atof(argv[3]); _arg3 = (float ) atof(argv[4]); _arg4 = (float ) atof(argv[5]); PDF_place_image(_arg0,_arg1,_arg2,_arg3,_arg4); return TCL_OK; } static int _wrap_PDF_place_inline_image(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; PDF_image * _arg1; float _arg2; float _arg3; float _arg4; clientData = clientData; argv = argv; if ((argc < 6) || (argc > 6)) { Tcl_SetResult(interp, "Wrong # args. PDF_place_inline_image p image x y scale ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_place_inline_image. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_place_inline_image. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _arg2 = (float ) atof(argv[3]); _arg3 = (float ) atof(argv[4]); _arg4 = (float ) atof(argv[5]); PDF_place_inline_image(_arg0,_arg1,_arg2,_arg3,_arg4); return TCL_OK; } static int _wrap_PDF_put_image(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; PDF_image * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_put_image p image ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_put_image. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_put_image. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } PDF_put_image(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_execute_image(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; PDF_image * _arg1; float _arg2; float _arg3; float _arg4; clientData = clientData; argv = argv; if ((argc < 6) || (argc > 6)) { Tcl_SetResult(interp, "Wrong # args. PDF_execute_image p image x y scale ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_execute_image. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_execute_image. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _arg2 = (float ) atof(argv[3]); _arg3 = (float ) atof(argv[4]); _arg4 = (float ) atof(argv[5]); PDF_execute_image(_arg0,_arg1,_arg2,_arg3,_arg4); return TCL_OK; } static int _wrap_PDF_close_image(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; PDF_image * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_close_image p image ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_close_image. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_close_image. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } PDF_close_image(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_open_JPEG(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_image * _result; PDF * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_open_JPEG p filename ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_open_JPEG. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (PDF_image *)PDF_open_JPEG(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_image_p"); return TCL_OK; } static int _wrap_PDF_close_JPEG(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; PDF_image * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_close_JPEG p image ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_close_JPEG. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_close_JPEG. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } PDF_close_JPEG(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_open_TIFF(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_image * _result; PDF * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_open_TIFF p filename ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_open_TIFF. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (PDF_image *)PDF_open_TIFF(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_image_p"); return TCL_OK; } static int _wrap_PDF_close_TIFF(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; PDF_image * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_close_TIFF p image ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_close_TIFF. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_close_TIFF. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } PDF_close_TIFF(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_open_GIF(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_image * _result; PDF * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_open_GIF p filename ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_open_GIF. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (PDF_image *)PDF_open_GIF(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_image_p"); return TCL_OK; } static int _wrap_PDF_close_GIF(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; PDF_image * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_close_GIF p image ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_close_GIF. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_close_GIF. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } PDF_close_GIF(_arg0,_arg1); return TCL_OK; } static int _wrap_PDF_data_source_from_buf(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; PDF_data_source * _arg1; byte * _arg2; long _arg3; clientData = clientData; argv = argv; if ((argc < 5) || (argc > 5)) { Tcl_SetResult(interp, "Wrong # args. PDF_data_source_from_buf p src buffer len ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_data_source_from_buf. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_data_source_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_data_source_from_buf. Expected _PDF_data_source_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[3],(void **) &_arg2,"_byte_p")) { Tcl_SetResult(interp, "Type error in argument 3 of PDF_data_source_from_buf. Expected _byte_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[3], (char *) NULL); return TCL_ERROR; } _arg3 = (long ) atol(argv[4]); PDF_data_source_from_buf(_arg0,_arg1,_arg2,_arg3); return TCL_OK; } static int _wrap_PDF_stringwidth(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF * _arg0; byte * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_stringwidth p text ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_stringwidth. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_byte_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_stringwidth. Expected _byte_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _result = (float )PDF_stringwidth(_arg0,_arg1); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } static int _wrap_PDF_add_outline(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_add_outline p text ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_add_outline. Expected _PDF_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; PDF_add_outline(_arg0,_arg1); return TCL_OK; } static int _wrap_fopen(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { FILE * _result; char * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. fopen { char * } { char * } ",TCL_STATIC); return TCL_ERROR; } _arg0 = argv[1]; _arg1 = argv[2]; _result = (FILE *)fopen(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_FILE_p"); return TCL_OK; } static int _wrap_fclose(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { FILE * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. fclose fp ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_FILE_p")) { Tcl_SetResult(interp, "Type error in argument 1 of fclose. Expected _FILE_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } fclose(_arg0); return TCL_OK; } #define PDF_pagesize_width_set(_swigobj,_swigval) (_swigobj->width = _swigval,_swigval) static int _wrap_PDF_pagesize_width_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_pagesize * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_pagesize_width_set { PDF_pagesize * } { float } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_pagesize_width_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _result = (float )PDF_pagesize_width_set(_arg0,_arg1); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_pagesize_width_get(_swigobj) ((float ) _swigobj->width) static int _wrap_PDF_pagesize_width_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_pagesize_width_get { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_pagesize_width_get. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (float )PDF_pagesize_width_get(_arg0); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_pagesize_height_set(_swigobj,_swigval) (_swigobj->height = _swigval,_swigval) static int _wrap_PDF_pagesize_height_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_pagesize * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_pagesize_height_set { PDF_pagesize * } { float } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_pagesize_height_set. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _result = (float )PDF_pagesize_height_set(_arg0,_arg1); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_pagesize_height_get(_swigobj) ((float ) _swigobj->height) static int _wrap_PDF_pagesize_height_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_pagesize * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_pagesize_height_get { PDF_pagesize * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_pagesize_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_pagesize_height_get. Expected _PDF_pagesize_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (float )PDF_pagesize_height_get(_arg0); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } /* methodcmd.swg : Tcl method invocation */ static int TclPDF_pagesizeMethodCmd(ClientData clientData, Tcl_Interp *interp, int argc, char **argv) { int (*cmd)(ClientData, Tcl_Interp *, int, char **) = 0; char temp[256], *oldarg; int rcode; int length; char c; if (argc < 2) { Tcl_SetResult(interp,"PDF_pagesize methods : { cget configure }",TCL_STATIC); return TCL_ERROR; } c = argv[1][0]; length = strlen(argv[1]); SWIG_MakePtr(temp,(void *) clientData, "_PDF_pagesize_p"); if (0); else if ((c == 'c') && (strncmp(argv[1],"configure",length) == 0) && (length >= 2)) { int i = 2; cmd = 0; while (i+1 < argc) { if (strcmp(argv[i],"-width") == 0) { cmd = _wrap_PDF_pagesize_width_set; } else if (strcmp(argv[i],"-height") == 0) { cmd = _wrap_PDF_pagesize_height_set; } if (cmd) { oldarg = argv[i]; argv[i] = &temp[0]; rcode = (*cmd)(clientData,interp,3,&argv[i-1]); argv[i] = oldarg; if (rcode == TCL_ERROR) return rcode; cmd = 0; } else { Tcl_SetResult(interp,"Invalid configure option. Must be { -width -height }",TCL_STATIC); return TCL_ERROR; } i+=2; } if ((i < argc) || (i == 2)) { Tcl_SetResult(interp,"{ -width -height }",TCL_STATIC); return TCL_ERROR; } return TCL_OK; } else if ((c == 'c') && (strncmp(argv[1],"cget",length) == 0) && (length >= 2)) { if (argc == 3) { if (0) {} if (strcmp(argv[2],"-width") == 0) { cmd = _wrap_PDF_pagesize_width_get; } else if (strcmp(argv[2],"-height") == 0) { cmd = _wrap_PDF_pagesize_height_get; } else if (strcmp(argv[2],"-this") == 0) { SWIG_MakePtr(interp->result,(void *) clientData, "_PDF_pagesize_p"); return TCL_OK; } if (cmd) { oldarg = argv[2]; argv[2] = &temp[0]; rcode = (*cmd)(clientData,interp,argc-1,&argv[1]); argv[2] = oldarg; return rcode; } else { Tcl_SetResult(interp,"Invalid cget option. Must be { -this -width -height }",TCL_STATIC); return TCL_ERROR; } } else { Tcl_SetResult(interp,"{ -this -width -height }", TCL_STATIC); return TCL_ERROR; } } if (!cmd) { Tcl_SetResult(interp,"Invalid Method. Must be { cget configure }",TCL_STATIC); return TCL_ERROR; } oldarg = argv[1]; argv[1] = &temp[0]; rcode = (*cmd)(clientData,interp,argc,argv); argv[1] = oldarg; return rcode; } /* objcmd.swg : Tcl object creation */ static int TclPDF_pagesizeCmd(ClientData clientData, Tcl_Interp *interp, int argc, char **argv) { void (*del)(ClientData) = 0; char *name = 0; int (*cmd)(ClientData, Tcl_Interp *, int, char **) = 0; PDF_pagesize * newObj = 0; int firstarg = 0; int thisarg = 0; if (argc == 1) { cmd = 0; } else { if (strcmp(argv[1],"-this") == 0) thisarg = 2; else if (strcmp(argv[1],"-args") == 0) { firstarg = 1; cmd = 0; } else if (argc == 2) { firstarg = 1; name = argv[1]; cmd = 0; } else if (argc >= 3) { name = argv[1]; if (strcmp(argv[2],"-this") == 0) thisarg = 3; else { firstarg = 1; cmd = 0; } } } if (cmd) { int result; result = (*cmd)(clientData,interp,argc-firstarg,&argv[firstarg]); if (result == TCL_OK) { SWIG_GetPtr(interp->result,(void **) &newObj,"_PDF_pagesize_p"); } else { return result; } if (!name) name = interp->result; del = 0; } else if (thisarg > 0) { if (thisarg < argc) { char *r; r = SWIG_GetPtr(argv[thisarg],(void **) &newObj,"_PDF_pagesize_p"); if (r) { interp->result = "Type error. not a PDF_pagesize object."; return TCL_ERROR; } if (!name) name = argv[thisarg]; /* Return value is same as pointer value */ Tcl_SetResult(interp,argv[thisarg],TCL_VOLATILE); } else { interp->result = "wrong # args."; return TCL_ERROR; } } else { interp->result = "No constructor available."; return TCL_ERROR; } { Tcl_CmdInfo dummy; if (!Tcl_GetCommandInfo(interp,name,&dummy)) { Tcl_CreateCommand(interp,name, TclPDF_pagesizeMethodCmd, (ClientData) newObj, del); return TCL_OK; } else { Tcl_SetResult(interp,"",TCL_VOLATILE); Tcl_AppendResult(interp,"Object ", name, " already exists!", (char *) NULL); return TCL_ERROR; } } } #define PDF_info_binary_mode_set(_swigobj,_swigval) (_swigobj->binary_mode = _swigval,_swigval) static int _wrap_PDF_info_binary_mode_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { bool _result; PDF_info * _arg0; bool _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_binary_mode_set { PDF_info * } { bool } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_binary_mode_set. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (bool ) atol(argv[2]); _result = (bool )PDF_info_binary_mode_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_info_binary_mode_get(_swigobj) ((bool ) _swigobj->binary_mode) static int _wrap_PDF_info_binary_mode_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { bool _result; PDF_info * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_binary_mode_get { PDF_info * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_binary_mode_get. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (bool )PDF_info_binary_mode_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_info_required_compatibility_set(_swigobj,_swigval) (_swigobj->required_compatibility = _swigval,_swigval) static int _wrap_PDF_info_required_compatibility_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_compat_mode _result; PDF_info * _arg0; PDF_compat_mode _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_required_compatibility_set { PDF_info * } { PDF_compat_mode } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_required_compatibility_set. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (PDF_compat_mode ) atol(argv[2]); _result = (PDF_compat_mode )PDF_info_required_compatibility_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_info_required_compatibility_get(_swigobj) ((PDF_compat_mode ) _swigobj->required_compatibility) static int _wrap_PDF_info_required_compatibility_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_compat_mode _result; PDF_info * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_required_compatibility_get { PDF_info * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_required_compatibility_get. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_compat_mode )PDF_info_required_compatibility_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } static char * PDF_info_Keywords_set(PDF_info *obj, char *val) { if (obj->Keywords) free(obj->Keywords); obj->Keywords = (char *) malloc(strlen(val)+1); strcpy(obj->Keywords,val); return val; } static int _wrap_PDF_info_Keywords_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_Keywords_set { PDF_info * } { char * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_Keywords_set. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (char *)PDF_info_Keywords_set(_arg0,_arg1); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } #define PDF_info_Keywords_get(_swigobj) ((char *) _swigobj->Keywords) static int _wrap_PDF_info_Keywords_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_Keywords_get { PDF_info * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_Keywords_get. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (char *)PDF_info_Keywords_get(_arg0); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } static char * PDF_info_Subject_set(PDF_info *obj, char *val) { if (obj->Subject) free(obj->Subject); obj->Subject = (char *) malloc(strlen(val)+1); strcpy(obj->Subject,val); return val; } static int _wrap_PDF_info_Subject_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_Subject_set { PDF_info * } { char * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_Subject_set. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (char *)PDF_info_Subject_set(_arg0,_arg1); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } #define PDF_info_Subject_get(_swigobj) ((char *) _swigobj->Subject) static int _wrap_PDF_info_Subject_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_Subject_get { PDF_info * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_Subject_get. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (char *)PDF_info_Subject_get(_arg0); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } static char * PDF_info_ModDate_set(PDF_info *obj, char *val) { if (obj->ModDate) free(obj->ModDate); obj->ModDate = (char *) malloc(strlen(val)+1); strcpy(obj->ModDate,val); return val; } static int _wrap_PDF_info_ModDate_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_ModDate_set { PDF_info * } { char * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_ModDate_set. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (char *)PDF_info_ModDate_set(_arg0,_arg1); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } #define PDF_info_ModDate_get(_swigobj) ((char *) _swigobj->ModDate) static int _wrap_PDF_info_ModDate_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_ModDate_get { PDF_info * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_ModDate_get. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (char *)PDF_info_ModDate_get(_arg0); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } static char * PDF_info_Title_set(PDF_info *obj, char *val) { if (obj->Title) free(obj->Title); obj->Title = (char *) malloc(strlen(val)+1); strcpy(obj->Title,val); return val; } static int _wrap_PDF_info_Title_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_Title_set { PDF_info * } { char * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_Title_set. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (char *)PDF_info_Title_set(_arg0,_arg1); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } #define PDF_info_Title_get(_swigobj) ((char *) _swigobj->Title) static int _wrap_PDF_info_Title_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_Title_get { PDF_info * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_Title_get. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (char *)PDF_info_Title_get(_arg0); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } static char * PDF_info_CreationDate_set(PDF_info *obj, char *val) { if (obj->CreationDate) free(obj->CreationDate); obj->CreationDate = (char *) malloc(strlen(val)+1); strcpy(obj->CreationDate,val); return val; } static int _wrap_PDF_info_CreationDate_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_CreationDate_set { PDF_info * } { char * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_CreationDate_set. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (char *)PDF_info_CreationDate_set(_arg0,_arg1); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } #define PDF_info_CreationDate_get(_swigobj) ((char *) _swigobj->CreationDate) static int _wrap_PDF_info_CreationDate_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_CreationDate_get { PDF_info * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_CreationDate_get. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (char *)PDF_info_CreationDate_get(_arg0); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } static char * PDF_info_Creator_set(PDF_info *obj, char *val) { if (obj->Creator) free(obj->Creator); obj->Creator = (char *) malloc(strlen(val)+1); strcpy(obj->Creator,val); return val; } static int _wrap_PDF_info_Creator_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_Creator_set { PDF_info * } { char * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_Creator_set. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (char *)PDF_info_Creator_set(_arg0,_arg1); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } #define PDF_info_Creator_get(_swigobj) ((char *) _swigobj->Creator) static int _wrap_PDF_info_Creator_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_Creator_get { PDF_info * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_Creator_get. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (char *)PDF_info_Creator_get(_arg0); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } static char * PDF_info_Author_set(PDF_info *obj, char *val) { if (obj->Author) free(obj->Author); obj->Author = (char *) malloc(strlen(val)+1); strcpy(obj->Author,val); return val; } static int _wrap_PDF_info_Author_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_Author_set { PDF_info * } { char * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_Author_set. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (char *)PDF_info_Author_set(_arg0,_arg1); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } #define PDF_info_Author_get(_swigobj) ((char *) _swigobj->Author) static int _wrap_PDF_info_Author_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_Author_get { PDF_info * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_Author_get. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (char *)PDF_info_Author_get(_arg0); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } static char * PDF_info_fontpath_set(PDF_info *obj, char *val) { if (obj->fontpath) free(obj->fontpath); obj->fontpath = (char *) malloc(strlen(val)+1); strcpy(obj->fontpath,val); return val; } static int _wrap_PDF_info_fontpath_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_fontpath_set { PDF_info * } { char * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_fontpath_set. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (char *)PDF_info_fontpath_set(_arg0,_arg1); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } #define PDF_info_fontpath_get(_swigobj) ((char *) _swigobj->fontpath) static int _wrap_PDF_info_fontpath_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_info * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_info_fontpath_get { PDF_info * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_info_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_info_fontpath_get. Expected _PDF_info_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (char *)PDF_info_fontpath_get(_arg0); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } /* methodcmd.swg : Tcl method invocation */ static int TclPDF_infoMethodCmd(ClientData clientData, Tcl_Interp *interp, int argc, char **argv) { int (*cmd)(ClientData, Tcl_Interp *, int, char **) = 0; char temp[256], *oldarg; int rcode; int length; char c; if (argc < 2) { Tcl_SetResult(interp,"PDF_info methods : { cget configure }",TCL_STATIC); return TCL_ERROR; } c = argv[1][0]; length = strlen(argv[1]); SWIG_MakePtr(temp,(void *) clientData, "_PDF_info_p"); if (0); else if ((c == 'c') && (strncmp(argv[1],"configure",length) == 0) && (length >= 2)) { int i = 2; cmd = 0; while (i+1 < argc) { if (strcmp(argv[i],"-binary_mode") == 0) { cmd = _wrap_PDF_info_binary_mode_set; } else if (strcmp(argv[i],"-required_compatibility") == 0) { cmd = _wrap_PDF_info_required_compatibility_set; } else if (strcmp(argv[i],"-Keywords") == 0) { cmd = _wrap_PDF_info_Keywords_set; } else if (strcmp(argv[i],"-Subject") == 0) { cmd = _wrap_PDF_info_Subject_set; } else if (strcmp(argv[i],"-ModDate") == 0) { cmd = _wrap_PDF_info_ModDate_set; } else if (strcmp(argv[i],"-Title") == 0) { cmd = _wrap_PDF_info_Title_set; } else if (strcmp(argv[i],"-CreationDate") == 0) { cmd = _wrap_PDF_info_CreationDate_set; } else if (strcmp(argv[i],"-Creator") == 0) { cmd = _wrap_PDF_info_Creator_set; } else if (strcmp(argv[i],"-Author") == 0) { cmd = _wrap_PDF_info_Author_set; } else if (strcmp(argv[i],"-fontpath") == 0) { cmd = _wrap_PDF_info_fontpath_set; } if (cmd) { oldarg = argv[i]; argv[i] = &temp[0]; rcode = (*cmd)(clientData,interp,3,&argv[i-1]); argv[i] = oldarg; if (rcode == TCL_ERROR) return rcode; cmd = 0; } else { Tcl_SetResult(interp,"Invalid configure option. Must be { -binary_mode -required_compatibility -Keywords -Subject -ModDate -Title -CreationDate -Creator -Author -fontpath }",TCL_STATIC); return TCL_ERROR; } i+=2; } if ((i < argc) || (i == 2)) { Tcl_SetResult(interp,"{ -binary_mode -required_compatibility -Keywords -Subject -ModDate -Title -CreationDate -Creator -Author -fontpath }",TCL_STATIC); return TCL_ERROR; } return TCL_OK; } else if ((c == 'c') && (strncmp(argv[1],"cget",length) == 0) && (length >= 2)) { if (argc == 3) { if (0) {} if (strcmp(argv[2],"-binary_mode") == 0) { cmd = _wrap_PDF_info_binary_mode_get; } else if (strcmp(argv[2],"-required_compatibility") == 0) { cmd = _wrap_PDF_info_required_compatibility_get; } else if (strcmp(argv[2],"-Keywords") == 0) { cmd = _wrap_PDF_info_Keywords_get; } else if (strcmp(argv[2],"-Subject") == 0) { cmd = _wrap_PDF_info_Subject_get; } else if (strcmp(argv[2],"-ModDate") == 0) { cmd = _wrap_PDF_info_ModDate_get; } else if (strcmp(argv[2],"-Title") == 0) { cmd = _wrap_PDF_info_Title_get; } else if (strcmp(argv[2],"-CreationDate") == 0) { cmd = _wrap_PDF_info_CreationDate_get; } else if (strcmp(argv[2],"-Creator") == 0) { cmd = _wrap_PDF_info_Creator_get; } else if (strcmp(argv[2],"-Author") == 0) { cmd = _wrap_PDF_info_Author_get; } else if (strcmp(argv[2],"-fontpath") == 0) { cmd = _wrap_PDF_info_fontpath_get; } else if (strcmp(argv[2],"-this") == 0) { SWIG_MakePtr(interp->result,(void *) clientData, "_PDF_info_p"); return TCL_OK; } if (cmd) { oldarg = argv[2]; argv[2] = &temp[0]; rcode = (*cmd)(clientData,interp,argc-1,&argv[1]); argv[2] = oldarg; return rcode; } else { Tcl_SetResult(interp,"Invalid cget option. Must be { -this -binary_mode -required_compatibility -Keywords -Subject -ModDate -Title -CreationDate -Creator -Author -fontpath }",TCL_STATIC); return TCL_ERROR; } } else { Tcl_SetResult(interp,"{ -this -binary_mode -required_compatibility -Keywords -Subject -ModDate -Title -CreationDate -Creator -Author -fontpath }", TCL_STATIC); return TCL_ERROR; } } if (!cmd) { Tcl_SetResult(interp,"Invalid Method. Must be { cget configure }",TCL_STATIC); return TCL_ERROR; } oldarg = argv[1]; argv[1] = &temp[0]; rcode = (*cmd)(clientData,interp,argc,argv); argv[1] = oldarg; return rcode; } /* objcmd.swg : Tcl object creation */ static int TclPDF_infoCmd(ClientData clientData, Tcl_Interp *interp, int argc, char **argv) { void (*del)(ClientData) = 0; char *name = 0; int (*cmd)(ClientData, Tcl_Interp *, int, char **) = 0; PDF_info * newObj = 0; int firstarg = 0; int thisarg = 0; if (argc == 1) { cmd = 0; } else { if (strcmp(argv[1],"-this") == 0) thisarg = 2; else if (strcmp(argv[1],"-args") == 0) { firstarg = 1; cmd = 0; } else if (argc == 2) { firstarg = 1; name = argv[1]; cmd = 0; } else if (argc >= 3) { name = argv[1]; if (strcmp(argv[2],"-this") == 0) thisarg = 3; else { firstarg = 1; cmd = 0; } } } if (cmd) { int result; result = (*cmd)(clientData,interp,argc-firstarg,&argv[firstarg]); if (result == TCL_OK) { SWIG_GetPtr(interp->result,(void **) &newObj,"_PDF_info_p"); } else { return result; } if (!name) name = interp->result; del = 0; } else if (thisarg > 0) { if (thisarg < argc) { char *r; r = SWIG_GetPtr(argv[thisarg],(void **) &newObj,"_PDF_info_p"); if (r) { interp->result = "Type error. not a PDF_info object."; return TCL_ERROR; } if (!name) name = argv[thisarg]; /* Return value is same as pointer value */ Tcl_SetResult(interp,argv[thisarg],TCL_VOLATILE); } else { interp->result = "wrong # args."; return TCL_ERROR; } } else { interp->result = "No constructor available."; return TCL_ERROR; } { Tcl_CmdInfo dummy; if (!Tcl_GetCommandInfo(interp,name,&dummy)) { Tcl_CreateCommand(interp,name, TclPDF_infoMethodCmd, (ClientData) newObj, del); return TCL_OK; } else { Tcl_SetResult(interp,"",TCL_VOLATILE); Tcl_AppendResult(interp,"Object ", name, " already exists!", (char *) NULL); return TCL_ERROR; } } } #define PDF_matrix_a_set(_swigobj,_swigval) (_swigobj->a = _swigval,_swigval) static int _wrap_PDF_matrix_a_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_a_set { PDF_matrix * } { float } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_a_set. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _result = (float )PDF_matrix_a_set(_arg0,_arg1); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_matrix_a_get(_swigobj) ((float ) _swigobj->a) static int _wrap_PDF_matrix_a_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_a_get { PDF_matrix * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_a_get. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (float )PDF_matrix_a_get(_arg0); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_matrix_b_set(_swigobj,_swigval) (_swigobj->b = _swigval,_swigval) static int _wrap_PDF_matrix_b_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_b_set { PDF_matrix * } { float } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_b_set. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _result = (float )PDF_matrix_b_set(_arg0,_arg1); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_matrix_b_get(_swigobj) ((float ) _swigobj->b) static int _wrap_PDF_matrix_b_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_b_get { PDF_matrix * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_b_get. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (float )PDF_matrix_b_get(_arg0); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_matrix_c_set(_swigobj,_swigval) (_swigobj->c = _swigval,_swigval) static int _wrap_PDF_matrix_c_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_c_set { PDF_matrix * } { float } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_c_set. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _result = (float )PDF_matrix_c_set(_arg0,_arg1); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_matrix_c_get(_swigobj) ((float ) _swigobj->c) static int _wrap_PDF_matrix_c_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_c_get { PDF_matrix * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_c_get. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (float )PDF_matrix_c_get(_arg0); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_matrix_d_set(_swigobj,_swigval) (_swigobj->d = _swigval,_swigval) static int _wrap_PDF_matrix_d_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_d_set { PDF_matrix * } { float } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_d_set. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _result = (float )PDF_matrix_d_set(_arg0,_arg1); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_matrix_d_get(_swigobj) ((float ) _swigobj->d) static int _wrap_PDF_matrix_d_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_d_get { PDF_matrix * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_d_get. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (float )PDF_matrix_d_get(_arg0); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_matrix_e_set(_swigobj,_swigval) (_swigobj->e = _swigval,_swigval) static int _wrap_PDF_matrix_e_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_e_set { PDF_matrix * } { float } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_e_set. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _result = (float )PDF_matrix_e_set(_arg0,_arg1); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_matrix_e_get(_swigobj) ((float ) _swigobj->e) static int _wrap_PDF_matrix_e_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_e_get { PDF_matrix * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_e_get. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (float )PDF_matrix_e_get(_arg0); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_matrix_f_set(_swigobj,_swigval) (_swigobj->f = _swigval,_swigval) static int _wrap_PDF_matrix_f_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_f_set { PDF_matrix * } { float } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_f_set. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _result = (float )PDF_matrix_f_set(_arg0,_arg1); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_matrix_f_get(_swigobj) ((float ) _swigobj->f) static int _wrap_PDF_matrix_f_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_matrix * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_matrix_f_get { PDF_matrix * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_matrix_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_matrix_f_get. Expected _PDF_matrix_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (float )PDF_matrix_f_get(_arg0); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } /* methodcmd.swg : Tcl method invocation */ static int TclPDF_matrixMethodCmd(ClientData clientData, Tcl_Interp *interp, int argc, char **argv) { int (*cmd)(ClientData, Tcl_Interp *, int, char **) = 0; char temp[256], *oldarg; int rcode; int length; char c; if (argc < 2) { Tcl_SetResult(interp,"PDF_matrix methods : { cget configure }",TCL_STATIC); return TCL_ERROR; } c = argv[1][0]; length = strlen(argv[1]); SWIG_MakePtr(temp,(void *) clientData, "_PDF_matrix_p"); if (0); else if ((c == 'c') && (strncmp(argv[1],"configure",length) == 0) && (length >= 2)) { int i = 2; cmd = 0; while (i+1 < argc) { if (strcmp(argv[i],"-a") == 0) { cmd = _wrap_PDF_matrix_a_set; } else if (strcmp(argv[i],"-b") == 0) { cmd = _wrap_PDF_matrix_b_set; } else if (strcmp(argv[i],"-c") == 0) { cmd = _wrap_PDF_matrix_c_set; } else if (strcmp(argv[i],"-d") == 0) { cmd = _wrap_PDF_matrix_d_set; } else if (strcmp(argv[i],"-e") == 0) { cmd = _wrap_PDF_matrix_e_set; } else if (strcmp(argv[i],"-f") == 0) { cmd = _wrap_PDF_matrix_f_set; } if (cmd) { oldarg = argv[i]; argv[i] = &temp[0]; rcode = (*cmd)(clientData,interp,3,&argv[i-1]); argv[i] = oldarg; if (rcode == TCL_ERROR) return rcode; cmd = 0; } else { Tcl_SetResult(interp,"Invalid configure option. Must be { -a -b -c -d -e -f }",TCL_STATIC); return TCL_ERROR; } i+=2; } if ((i < argc) || (i == 2)) { Tcl_SetResult(interp,"{ -a -b -c -d -e -f }",TCL_STATIC); return TCL_ERROR; } return TCL_OK; } else if ((c == 'c') && (strncmp(argv[1],"cget",length) == 0) && (length >= 2)) { if (argc == 3) { if (0) {} if (strcmp(argv[2],"-a") == 0) { cmd = _wrap_PDF_matrix_a_get; } else if (strcmp(argv[2],"-b") == 0) { cmd = _wrap_PDF_matrix_b_get; } else if (strcmp(argv[2],"-c") == 0) { cmd = _wrap_PDF_matrix_c_get; } else if (strcmp(argv[2],"-d") == 0) { cmd = _wrap_PDF_matrix_d_get; } else if (strcmp(argv[2],"-e") == 0) { cmd = _wrap_PDF_matrix_e_get; } else if (strcmp(argv[2],"-f") == 0) { cmd = _wrap_PDF_matrix_f_get; } else if (strcmp(argv[2],"-this") == 0) { SWIG_MakePtr(interp->result,(void *) clientData, "_PDF_matrix_p"); return TCL_OK; } if (cmd) { oldarg = argv[2]; argv[2] = &temp[0]; rcode = (*cmd)(clientData,interp,argc-1,&argv[1]); argv[2] = oldarg; return rcode; } else { Tcl_SetResult(interp,"Invalid cget option. Must be { -this -a -b -c -d -e -f }",TCL_STATIC); return TCL_ERROR; } } else { Tcl_SetResult(interp,"{ -this -a -b -c -d -e -f }", TCL_STATIC); return TCL_ERROR; } } if (!cmd) { Tcl_SetResult(interp,"Invalid Method. Must be { cget configure }",TCL_STATIC); return TCL_ERROR; } oldarg = argv[1]; argv[1] = &temp[0]; rcode = (*cmd)(clientData,interp,argc,argv); argv[1] = oldarg; return rcode; } /* objcmd.swg : Tcl object creation */ static int TclPDF_matrixCmd(ClientData clientData, Tcl_Interp *interp, int argc, char **argv) { void (*del)(ClientData) = 0; char *name = 0; int (*cmd)(ClientData, Tcl_Interp *, int, char **) = 0; PDF_matrix * newObj = 0; int firstarg = 0; int thisarg = 0; if (argc == 1) { cmd = 0; } else { if (strcmp(argv[1],"-this") == 0) thisarg = 2; else if (strcmp(argv[1],"-args") == 0) { firstarg = 1; cmd = 0; } else if (argc == 2) { firstarg = 1; name = argv[1]; cmd = 0; } else if (argc >= 3) { name = argv[1]; if (strcmp(argv[2],"-this") == 0) thisarg = 3; else { firstarg = 1; cmd = 0; } } } if (cmd) { int result; result = (*cmd)(clientData,interp,argc-firstarg,&argv[firstarg]); if (result == TCL_OK) { SWIG_GetPtr(interp->result,(void **) &newObj,"_PDF_matrix_p"); } else { return result; } if (!name) name = interp->result; del = 0; } else if (thisarg > 0) { if (thisarg < argc) { char *r; r = SWIG_GetPtr(argv[thisarg],(void **) &newObj,"_PDF_matrix_p"); if (r) { interp->result = "Type error. not a PDF_matrix object."; return TCL_ERROR; } if (!name) name = argv[thisarg]; /* Return value is same as pointer value */ Tcl_SetResult(interp,argv[thisarg],TCL_VOLATILE); } else { interp->result = "wrong # args."; return TCL_ERROR; } } else { interp->result = "No constructor available."; return TCL_ERROR; } { Tcl_CmdInfo dummy; if (!Tcl_GetCommandInfo(interp,name,&dummy)) { Tcl_CreateCommand(interp,name, TclPDF_matrixMethodCmd, (ClientData) newObj, del); return TCL_OK; } else { Tcl_SetResult(interp,"",TCL_VOLATILE); Tcl_AppendResult(interp,"Object ", name, " already exists!", (char *) NULL); return TCL_ERROR; } } } #define PDF_data_source_s_next_byte_set(_swigobj,_swigval) (_swigobj->next_byte = _swigval,_swigval) static int _wrap_PDF_data_source_s_next_byte_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { byte * _result; struct PDF_data_source_s * _arg0; byte * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_data_source_s_next_byte_set { struct PDF_data_source_s * } { byte * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_struct_PDF_data_source_s_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_data_source_s_next_byte_set. Expected _struct_PDF_data_source_s_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_byte_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_data_source_s_next_byte_set. Expected _byte_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _result = (byte *)PDF_data_source_s_next_byte_set(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_byte_p"); return TCL_OK; } #define PDF_data_source_s_next_byte_get(_swigobj) ((byte *) _swigobj->next_byte) static int _wrap_PDF_data_source_s_next_byte_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { byte * _result; struct PDF_data_source_s * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_data_source_s_next_byte_get { struct PDF_data_source_s * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_struct_PDF_data_source_s_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_data_source_s_next_byte_get. Expected _struct_PDF_data_source_s_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (byte *)PDF_data_source_s_next_byte_get(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_byte_p"); return TCL_OK; } #define PDF_data_source_s_bytes_available_set(_swigobj,_swigval) (_swigobj->bytes_available = *(_swigval),_swigval) static int _wrap_PDF_data_source_s_bytes_available_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { size_t * _result; struct PDF_data_source_s * _arg0; size_t * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_data_source_s_bytes_available_set { struct PDF_data_source_s * } { size_t * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_struct_PDF_data_source_s_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_data_source_s_bytes_available_set. Expected _struct_PDF_data_source_s_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_size_t_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_data_source_s_bytes_available_set. Expected _size_t_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _result = (size_t *)PDF_data_source_s_bytes_available_set(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_size_t_p"); return TCL_OK; } #define PDF_data_source_s_bytes_available_get(_swigobj) (&_swigobj->bytes_available) static int _wrap_PDF_data_source_s_bytes_available_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { size_t * _result; struct PDF_data_source_s * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_data_source_s_bytes_available_get { struct PDF_data_source_s * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_struct_PDF_data_source_s_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_data_source_s_bytes_available_get. Expected _struct_PDF_data_source_s_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (size_t *)PDF_data_source_s_bytes_available_get(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_size_t_p"); return TCL_OK; } #define PDF_data_source_s_buffer_start_set(_swigobj,_swigval) (_swigobj->buffer_start = _swigval,_swigval) static int _wrap_PDF_data_source_s_buffer_start_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { byte * _result; struct PDF_data_source_s * _arg0; byte * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_data_source_s_buffer_start_set { struct PDF_data_source_s * } { byte * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_struct_PDF_data_source_s_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_data_source_s_buffer_start_set. Expected _struct_PDF_data_source_s_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_byte_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_data_source_s_buffer_start_set. Expected _byte_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _result = (byte *)PDF_data_source_s_buffer_start_set(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_byte_p"); return TCL_OK; } #define PDF_data_source_s_buffer_start_get(_swigobj) ((byte *) _swigobj->buffer_start) static int _wrap_PDF_data_source_s_buffer_start_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { byte * _result; struct PDF_data_source_s * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_data_source_s_buffer_start_get { struct PDF_data_source_s * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_struct_PDF_data_source_s_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_data_source_s_buffer_start_get. Expected _struct_PDF_data_source_s_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (byte *)PDF_data_source_s_buffer_start_get(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_byte_p"); return TCL_OK; } #define PDF_data_source_s_buffer_length_set(_swigobj,_swigval) (_swigobj->buffer_length = *(_swigval),_swigval) static int _wrap_PDF_data_source_s_buffer_length_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { size_t * _result; struct PDF_data_source_s * _arg0; size_t * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_data_source_s_buffer_length_set { struct PDF_data_source_s * } { size_t * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_struct_PDF_data_source_s_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_data_source_s_buffer_length_set. Expected _struct_PDF_data_source_s_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_size_t_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_data_source_s_buffer_length_set. Expected _size_t_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _result = (size_t *)PDF_data_source_s_buffer_length_set(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_size_t_p"); return TCL_OK; } #define PDF_data_source_s_buffer_length_get(_swigobj) (&_swigobj->buffer_length) static int _wrap_PDF_data_source_s_buffer_length_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { size_t * _result; struct PDF_data_source_s * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_data_source_s_buffer_length_get { struct PDF_data_source_s * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_struct_PDF_data_source_s_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_data_source_s_buffer_length_get. Expected _struct_PDF_data_source_s_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (size_t *)PDF_data_source_s_buffer_length_get(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_size_t_p"); return TCL_OK; } #define PDF_data_source_s_private_data_set(_swigobj,_swigval) (_swigobj->private_data = _swigval,_swigval) static int _wrap_PDF_data_source_s_private_data_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { byte * _result; struct PDF_data_source_s * _arg0; byte * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_data_source_s_private_data_set { struct PDF_data_source_s * } { byte * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_struct_PDF_data_source_s_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_data_source_s_private_data_set. Expected _struct_PDF_data_source_s_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_byte_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_data_source_s_private_data_set. Expected _byte_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _result = (byte *)PDF_data_source_s_private_data_set(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_byte_p"); return TCL_OK; } #define PDF_data_source_s_private_data_get(_swigobj) ((byte *) _swigobj->private_data) static int _wrap_PDF_data_source_s_private_data_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { byte * _result; struct PDF_data_source_s * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_data_source_s_private_data_get { struct PDF_data_source_s * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_struct_PDF_data_source_s_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_data_source_s_private_data_get. Expected _struct_PDF_data_source_s_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (byte *)PDF_data_source_s_private_data_get(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_byte_p"); return TCL_OK; } /* methodcmd.swg : Tcl method invocation */ static int TclPDF_data_source_sMethodCmd(ClientData clientData, Tcl_Interp *interp, int argc, char **argv) { int (*cmd)(ClientData, Tcl_Interp *, int, char **) = 0; char temp[256], *oldarg; int rcode; int length; char c; if (argc < 2) { Tcl_SetResult(interp,"PDF_data_source_s methods : { cget configure }",TCL_STATIC); return TCL_ERROR; } c = argv[1][0]; length = strlen(argv[1]); SWIG_MakePtr(temp,(void *) clientData, "_struct_PDF_data_source_s_p"); if (0); else if ((c == 'c') && (strncmp(argv[1],"configure",length) == 0) && (length >= 2)) { int i = 2; cmd = 0; while (i+1 < argc) { if (strcmp(argv[i],"-next_byte") == 0) { cmd = _wrap_PDF_data_source_s_next_byte_set; } else if (strcmp(argv[i],"-bytes_available") == 0) { cmd = _wrap_PDF_data_source_s_bytes_available_set; } else if (strcmp(argv[i],"-buffer_start") == 0) { cmd = _wrap_PDF_data_source_s_buffer_start_set; } else if (strcmp(argv[i],"-buffer_length") == 0) { cmd = _wrap_PDF_data_source_s_buffer_length_set; } else if (strcmp(argv[i],"-private_data") == 0) { cmd = _wrap_PDF_data_source_s_private_data_set; } if (cmd) { oldarg = argv[i]; argv[i] = &temp[0]; rcode = (*cmd)(clientData,interp,3,&argv[i-1]); argv[i] = oldarg; if (rcode == TCL_ERROR) return rcode; cmd = 0; } else { Tcl_SetResult(interp,"Invalid configure option. Must be { -next_byte -bytes_available -buffer_start -buffer_length -private_data }",TCL_STATIC); return TCL_ERROR; } i+=2; } if ((i < argc) || (i == 2)) { Tcl_SetResult(interp,"{ -next_byte -bytes_available -buffer_start -buffer_length -private_data }",TCL_STATIC); return TCL_ERROR; } return TCL_OK; } else if ((c == 'c') && (strncmp(argv[1],"cget",length) == 0) && (length >= 2)) { if (argc == 3) { if (0) {} if (strcmp(argv[2],"-next_byte") == 0) { cmd = _wrap_PDF_data_source_s_next_byte_get; } else if (strcmp(argv[2],"-bytes_available") == 0) { cmd = _wrap_PDF_data_source_s_bytes_available_get; } else if (strcmp(argv[2],"-buffer_start") == 0) { cmd = _wrap_PDF_data_source_s_buffer_start_get; } else if (strcmp(argv[2],"-buffer_length") == 0) { cmd = _wrap_PDF_data_source_s_buffer_length_get; } else if (strcmp(argv[2],"-private_data") == 0) { cmd = _wrap_PDF_data_source_s_private_data_get; } else if (strcmp(argv[2],"-this") == 0) { SWIG_MakePtr(interp->result,(void *) clientData, "_struct_PDF_data_source_s_p"); return TCL_OK; } if (cmd) { oldarg = argv[2]; argv[2] = &temp[0]; rcode = (*cmd)(clientData,interp,argc-1,&argv[1]); argv[2] = oldarg; return rcode; } else { Tcl_SetResult(interp,"Invalid cget option. Must be { -this -next_byte -bytes_available -buffer_start -buffer_length -private_data }",TCL_STATIC); return TCL_ERROR; } } else { Tcl_SetResult(interp,"{ -this -next_byte -bytes_available -buffer_start -buffer_length -private_data }", TCL_STATIC); return TCL_ERROR; } } if (!cmd) { Tcl_SetResult(interp,"Invalid Method. Must be { cget configure }",TCL_STATIC); return TCL_ERROR; } oldarg = argv[1]; argv[1] = &temp[0]; rcode = (*cmd)(clientData,interp,argc,argv); argv[1] = oldarg; return rcode; } /* objcmd.swg : Tcl object creation */ static int TclPDF_data_source_sCmd(ClientData clientData, Tcl_Interp *interp, int argc, char **argv) { void (*del)(ClientData) = 0; char *name = 0; int (*cmd)(ClientData, Tcl_Interp *, int, char **) = 0; struct PDF_data_source_s * newObj = 0; int firstarg = 0; int thisarg = 0; if (argc == 1) { cmd = 0; } else { if (strcmp(argv[1],"-this") == 0) thisarg = 2; else if (strcmp(argv[1],"-args") == 0) { firstarg = 1; cmd = 0; } else if (argc == 2) { firstarg = 1; name = argv[1]; cmd = 0; } else if (argc >= 3) { name = argv[1]; if (strcmp(argv[2],"-this") == 0) thisarg = 3; else { firstarg = 1; cmd = 0; } } } if (cmd) { int result; result = (*cmd)(clientData,interp,argc-firstarg,&argv[firstarg]); if (result == TCL_OK) { SWIG_GetPtr(interp->result,(void **) &newObj,"_struct_PDF_data_source_s_p"); } else { return result; } if (!name) name = interp->result; del = 0; } else if (thisarg > 0) { if (thisarg < argc) { char *r; r = SWIG_GetPtr(argv[thisarg],(void **) &newObj,"_struct_PDF_data_source_s_p"); if (r) { interp->result = "Type error. not a PDF_data_source_s object."; return TCL_ERROR; } if (!name) name = argv[thisarg]; /* Return value is same as pointer value */ Tcl_SetResult(interp,argv[thisarg],TCL_VOLATILE); } else { interp->result = "wrong # args."; return TCL_ERROR; } } else { interp->result = "No constructor available."; return TCL_ERROR; } { Tcl_CmdInfo dummy; if (!Tcl_GetCommandInfo(interp,name,&dummy)) { Tcl_CreateCommand(interp,name, TclPDF_data_source_sMethodCmd, (ClientData) newObj, del); return TCL_OK; } else { Tcl_SetResult(interp,"",TCL_VOLATILE); Tcl_AppendResult(interp,"Object ", name, " already exists!", (char *) NULL); return TCL_ERROR; } } } #define PDF_image_t_fp_set(_swigobj,_swigval) (_swigobj->fp = _swigval,_swigval) static int _wrap_PDF_image_fp_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { FILE * _result; PDF_image * _arg0; FILE * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_fp_set { PDF_image * } { FILE * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_fp_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_FILE_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_image_fp_set. Expected _FILE_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _result = (FILE *)PDF_image_t_fp_set(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_FILE_p"); return TCL_OK; } #define PDF_image_t_fp_get(_swigobj) ((FILE *) _swigobj->fp) static int _wrap_PDF_image_fp_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { FILE * _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_fp_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_fp_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (FILE *)PDF_image_t_fp_get(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_FILE_p"); return TCL_OK; } static char * PDF_image_t_filename_set(PDF_image *obj, char *val) { if (obj->filename) free(obj->filename); obj->filename = (char *) malloc(strlen(val)+1); strcpy(obj->filename,val); return val; } static int _wrap_PDF_image_filename_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_image * _arg0; char * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_filename_set { PDF_image * } { char * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_filename_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = argv[2]; _result = (char *)PDF_image_t_filename_set(_arg0,_arg1); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } #define PDF_image_t_filename_get(_swigobj) ((char *) _swigobj->filename) static int _wrap_PDF_image_filename_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { char * _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_filename_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_filename_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (char *)PDF_image_t_filename_get(_arg0); Tcl_SetResult(interp, (char *) _result, TCL_VOLATILE); return TCL_OK; } #define PDF_image_t_width_set(_swigobj,_swigval) (_swigobj->width = _swigval,_swigval) static int _wrap_PDF_image_width_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; unsigned int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_width_set { PDF_image * } { unsigned int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_width_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (unsigned int ) strtoul(argv[2],(char **) NULL,0); _result = (unsigned int )PDF_image_t_width_set(_arg0,_arg1); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_width_get(_swigobj) ((unsigned int ) _swigobj->width) static int _wrap_PDF_image_width_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_width_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_width_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (unsigned int )PDF_image_t_width_get(_arg0); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_height_set(_swigobj,_swigval) (_swigobj->height = _swigval,_swigval) static int _wrap_PDF_image_height_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; unsigned int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_height_set { PDF_image * } { unsigned int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_height_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (unsigned int ) strtoul(argv[2],(char **) NULL,0); _result = (unsigned int )PDF_image_t_height_set(_arg0,_arg1); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_height_get(_swigobj) ((unsigned int ) _swigobj->height) static int _wrap_PDF_image_height_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_height_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_height_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (unsigned int )PDF_image_t_height_get(_arg0); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_bpc_set(_swigobj,_swigval) (_swigobj->bpc = _swigval,_swigval) static int _wrap_PDF_image_bpc_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_bpc_set { PDF_image * } { int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_bpc_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (int ) atol(argv[2]); _result = (int )PDF_image_t_bpc_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_bpc_get(_swigobj) ((int ) _swigobj->bpc) static int _wrap_PDF_image_bpc_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_bpc_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_bpc_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (int )PDF_image_t_bpc_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_components_set(_swigobj,_swigval) (_swigobj->components = _swigval,_swigval) static int _wrap_PDF_image_components_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; unsigned int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_components_set { PDF_image * } { unsigned int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_components_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (unsigned int ) strtoul(argv[2],(char **) NULL,0); _result = (unsigned int )PDF_image_t_components_set(_arg0,_arg1); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_components_get(_swigobj) ((unsigned int ) _swigobj->components) static int _wrap_PDF_image_components_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_components_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_components_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (unsigned int )PDF_image_t_components_get(_arg0); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_compression_set(_swigobj,_swigval) (_swigobj->compression = _swigval,_swigval) static int _wrap_PDF_image_compression_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_compression _result; PDF_image * _arg0; PDF_compression _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_compression_set { PDF_image * } { PDF_compression } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_compression_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (PDF_compression ) atol(argv[2]); _result = (PDF_compression )PDF_image_t_compression_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_compression_get(_swigobj) ((PDF_compression ) _swigobj->compression) static int _wrap_PDF_image_compression_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_compression _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_compression_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_compression_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_compression )PDF_image_t_compression_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_colorspace_set(_swigobj,_swigval) (_swigobj->colorspace = _swigval,_swigval) static int _wrap_PDF_image_colorspace_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_colorspace _result; PDF_image * _arg0; PDF_colorspace _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_colorspace_set { PDF_image * } { PDF_colorspace } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_colorspace_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (PDF_colorspace ) atol(argv[2]); _result = (PDF_colorspace )PDF_image_t_colorspace_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_colorspace_get(_swigobj) ((PDF_colorspace ) _swigobj->colorspace) static int _wrap_PDF_image_colorspace_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_colorspace _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_colorspace_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_colorspace_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_colorspace )PDF_image_t_colorspace_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_indexed_set(_swigobj,_swigval) (_swigobj->indexed = _swigval,_swigval) static int _wrap_PDF_image_indexed_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { bool _result; PDF_image * _arg0; bool _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_indexed_set { PDF_image * } { bool } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_indexed_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (bool ) atol(argv[2]); _result = (bool )PDF_image_t_indexed_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_indexed_get(_swigobj) ((bool ) _swigobj->indexed) static int _wrap_PDF_image_indexed_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { bool _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_indexed_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_indexed_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (bool )PDF_image_t_indexed_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_BitPixel_set(_swigobj,_swigval) (_swigobj->BitPixel = _swigval,_swigval) static int _wrap_PDF_image_BitPixel_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; unsigned int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_BitPixel_set { PDF_image * } { unsigned int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_BitPixel_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (unsigned int ) strtoul(argv[2],(char **) NULL,0); _result = (unsigned int )PDF_image_t_BitPixel_set(_arg0,_arg1); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_BitPixel_get(_swigobj) ((unsigned int ) _swigobj->BitPixel) static int _wrap_PDF_image_BitPixel_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_BitPixel_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_BitPixel_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (unsigned int )PDF_image_t_BitPixel_get(_arg0); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_colormap_get(_swigobj) ((byte *) _swigobj->colormap) static int _wrap_PDF_image_colormap_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { byte * _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_colormap_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_colormap_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (byte *)PDF_image_t_colormap_get(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_pdf_colormap"); return TCL_OK; } #define PDF_image_t_adobe_set(_swigobj,_swigval) (_swigobj->adobe = _swigval,_swigval) static int _wrap_PDF_image_adobe_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { bool _result; PDF_image * _arg0; bool _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_adobe_set { PDF_image * } { bool } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_adobe_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (bool ) atol(argv[2]); _result = (bool )PDF_image_t_adobe_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_adobe_get(_swigobj) ((bool ) _swigobj->adobe) static int _wrap_PDF_image_adobe_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { bool _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_adobe_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_adobe_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (bool )PDF_image_t_adobe_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_startpos_set(_swigobj,_swigval) (_swigobj->startpos = _swigval,_swigval) static int _wrap_PDF_image_startpos_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { long _result; PDF_image * _arg0; long _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_startpos_set { PDF_image * } { long } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_startpos_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (long ) atol(argv[2]); _result = (long )PDF_image_t_startpos_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_startpos_get(_swigobj) ((long ) _swigobj->startpos) static int _wrap_PDF_image_startpos_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { long _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_startpos_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_startpos_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (long )PDF_image_t_startpos_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_dpi_set(_swigobj,_swigval) (_swigobj->dpi = _swigval,_swigval) static int _wrap_PDF_image_dpi_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_image * _arg0; float _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_dpi_set { PDF_image * } { float } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_dpi_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (float ) atof(argv[2]); _result = (float )PDF_image_t_dpi_set(_arg0,_arg1); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_image_t_dpi_get(_swigobj) ((float ) _swigobj->dpi) static int _wrap_PDF_image_dpi_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { float _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_dpi_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_dpi_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (float )PDF_image_t_dpi_get(_arg0); Tcl_PrintDouble(interp,(double) _result, interp->result); return TCL_OK; } #define PDF_image_t_Background_set(_swigobj,_swigval) (_swigobj->Background = _swigval,_swigval) static int _wrap_PDF_image_Background_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; unsigned int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_Background_set { PDF_image * } { unsigned int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_Background_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (unsigned int ) strtoul(argv[2],(char **) NULL,0); _result = (unsigned int )PDF_image_t_Background_set(_arg0,_arg1); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_Background_get(_swigobj) ((unsigned int ) _swigobj->Background) static int _wrap_PDF_image_Background_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_Background_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_Background_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (unsigned int )PDF_image_t_Background_get(_arg0); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_transparent_set(_swigobj,_swigval) (_swigobj->transparent = _swigval,_swigval) static int _wrap_PDF_image_transparent_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_transparent_set { PDF_image * } { int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_transparent_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (int ) atol(argv[2]); _result = (int )PDF_image_t_transparent_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_transparent_get(_swigobj) ((int ) _swigobj->transparent) static int _wrap_PDF_image_transparent_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_transparent_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_transparent_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (int )PDF_image_t_transparent_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_delayTime_set(_swigobj,_swigval) (_swigobj->delayTime = _swigval,_swigval) static int _wrap_PDF_image_delayTime_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_delayTime_set { PDF_image * } { int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_delayTime_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (int ) atol(argv[2]); _result = (int )PDF_image_t_delayTime_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_delayTime_get(_swigobj) ((int ) _swigobj->delayTime) static int _wrap_PDF_image_delayTime_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_delayTime_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_delayTime_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (int )PDF_image_t_delayTime_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_inputFlag_set(_swigobj,_swigval) (_swigobj->inputFlag = _swigval,_swigval) static int _wrap_PDF_image_inputFlag_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_inputFlag_set { PDF_image * } { int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_inputFlag_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (int ) atol(argv[2]); _result = (int )PDF_image_t_inputFlag_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_inputFlag_get(_swigobj) ((int ) _swigobj->inputFlag) static int _wrap_PDF_image_inputFlag_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_inputFlag_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_inputFlag_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (int )PDF_image_t_inputFlag_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_disposal_set(_swigobj,_swigval) (_swigobj->disposal = _swigval,_swigval) static int _wrap_PDF_image_disposal_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_disposal_set { PDF_image * } { int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_disposal_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (int ) atol(argv[2]); _result = (int )PDF_image_t_disposal_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_disposal_get(_swigobj) ((int ) _swigobj->disposal) static int _wrap_PDF_image_disposal_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_disposal_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_disposal_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (int )PDF_image_t_disposal_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_useGlobalColormap_set(_swigobj,_swigval) (_swigobj->useGlobalColormap = _swigval,_swigval) static int _wrap_PDF_image_useGlobalColormap_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_useGlobalColormap_set { PDF_image * } { int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_useGlobalColormap_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (int ) atol(argv[2]); _result = (int )PDF_image_t_useGlobalColormap_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_useGlobalColormap_get(_swigobj) ((int ) _swigobj->useGlobalColormap) static int _wrap_PDF_image_useGlobalColormap_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_useGlobalColormap_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_useGlobalColormap_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (int )PDF_image_t_useGlobalColormap_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_bitPixel_set(_swigobj,_swigval) (_swigobj->bitPixel = _swigval,_swigval) static int _wrap_PDF_image_bitPixel_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; unsigned int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_bitPixel_set { PDF_image * } { unsigned int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_bitPixel_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (unsigned int ) strtoul(argv[2],(char **) NULL,0); _result = (unsigned int )PDF_image_t_bitPixel_set(_arg0,_arg1); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_bitPixel_get(_swigobj) ((unsigned int ) _swigobj->bitPixel) static int _wrap_PDF_image_bitPixel_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { unsigned int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_bitPixel_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_bitPixel_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (unsigned int )PDF_image_t_bitPixel_get(_arg0); sprintf(interp->result,"%lu", (unsigned long) _result); return TCL_OK; } #define PDF_image_t_interlace_set(_swigobj,_swigval) (_swigobj->interlace = _swigval,_swigval) static int _wrap_PDF_image_interlace_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { bool _result; PDF_image * _arg0; bool _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_interlace_set { PDF_image * } { bool } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_interlace_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (bool ) atol(argv[2]); _result = (bool )PDF_image_t_interlace_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_interlace_get(_swigobj) ((bool ) _swigobj->interlace) static int _wrap_PDF_image_interlace_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { bool _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_interlace_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_interlace_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (bool )PDF_image_t_interlace_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_imageno_set(_swigobj,_swigval) (_swigobj->imageno = _swigval,_swigval) static int _wrap_PDF_image_imageno_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_imageno_set { PDF_image * } { int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_imageno_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (int ) atol(argv[2]); _result = (int )PDF_image_t_imageno_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_imageno_get(_swigobj) ((int ) _swigobj->imageno) static int _wrap_PDF_image_imageno_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_imageno_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_imageno_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (int )PDF_image_t_imageno_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_no_set(_swigobj,_swigval) (_swigobj->no = _swigval,_swigval) static int _wrap_PDF_image_no_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; int _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_no_set { PDF_image * } { int } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_no_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _arg1 = (int ) atol(argv[2]); _result = (int )PDF_image_t_no_set(_arg0,_arg1); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_no_get(_swigobj) ((int ) _swigobj->no) static int _wrap_PDF_image_no_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { int _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_no_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_no_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (int )PDF_image_t_no_get(_arg0); sprintf(interp->result,"%ld", (long) _result); return TCL_OK; } #define PDF_image_t_src_set(_swigobj,_swigval) (_swigobj->src = *(_swigval),_swigval) static int _wrap_PDF_image_src_set(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_data_source * _result; PDF_image * _arg0; PDF_data_source * _arg1; clientData = clientData; argv = argv; if ((argc < 3) || (argc > 3)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_src_set { PDF_image * } { PDF_data_source * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_src_set. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } if (SWIG_GetPtr(argv[2],(void **) &_arg1,"_PDF_data_source_p")) { Tcl_SetResult(interp, "Type error in argument 2 of PDF_image_src_set. Expected _PDF_data_source_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[2], (char *) NULL); return TCL_ERROR; } _result = (PDF_data_source *)PDF_image_t_src_set(_arg0,_arg1); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_data_source_p"); return TCL_OK; } #define PDF_image_t_src_get(_swigobj) (&_swigobj->src) static int _wrap_PDF_image_src_get(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PDF_data_source * _result; PDF_image * _arg0; clientData = clientData; argv = argv; if ((argc < 2) || (argc > 2)) { Tcl_SetResult(interp, "Wrong # args. PDF_image_src_get { PDF_image * } ",TCL_STATIC); return TCL_ERROR; } if (SWIG_GetPtr(argv[1],(void **) &_arg0,"_PDF_image_p")) { Tcl_SetResult(interp, "Type error in argument 1 of PDF_image_src_get. Expected _PDF_image_p, received ", TCL_STATIC); Tcl_AppendResult(interp, argv[1], (char *) NULL); return TCL_ERROR; } _result = (PDF_data_source *)PDF_image_t_src_get(_arg0); SWIG_MakePtr(interp->result, (void *) _result,"_PDF_data_source_p"); return TCL_OK; } /* methodcmd.swg : Tcl method invocation */ static int TclPDF_imageMethodCmd(ClientData clientData, Tcl_Interp *interp, int argc, char **argv) { int (*cmd)(ClientData, Tcl_Interp *, int, char **) = 0; char temp[256], *oldarg; int rcode; int length; char c; if (argc < 2) { Tcl_SetResult(interp,"PDF_image methods : { cget configure }",TCL_STATIC); return TCL_ERROR; } c = argv[1][0]; length = strlen(argv[1]); SWIG_MakePtr(temp,(void *) clientData, "_PDF_image_p"); if (0); else if ((c == 'c') && (strncmp(argv[1],"configure",length) == 0) && (length >= 2)) { int i = 2; cmd = 0; while (i+1 < argc) { if (strcmp(argv[i],"-fp") == 0) { cmd = _wrap_PDF_image_fp_set; } else if (strcmp(argv[i],"-filename") == 0) { cmd = _wrap_PDF_image_filename_set; } else if (strcmp(argv[i],"-width") == 0) { cmd = _wrap_PDF_image_width_set; } else if (strcmp(argv[i],"-height") == 0) { cmd = _wrap_PDF_image_height_set; } else if (strcmp(argv[i],"-bpc") == 0) { cmd = _wrap_PDF_image_bpc_set; } else if (strcmp(argv[i],"-components") == 0) { cmd = _wrap_PDF_image_components_set; } else if (strcmp(argv[i],"-compression") == 0) { cmd = _wrap_PDF_image_compression_set; } else if (strcmp(argv[i],"-colorspace") == 0) { cmd = _wrap_PDF_image_colorspace_set; } else if (strcmp(argv[i],"-indexed") == 0) { cmd = _wrap_PDF_image_indexed_set; } else if (strcmp(argv[i],"-BitPixel") == 0) { cmd = _wrap_PDF_image_BitPixel_set; } else if (strcmp(argv[i],"-adobe") == 0) { cmd = _wrap_PDF_image_adobe_set; } else if (strcmp(argv[i],"-startpos") == 0) { cmd = _wrap_PDF_image_startpos_set; } else if (strcmp(argv[i],"-dpi") == 0) { cmd = _wrap_PDF_image_dpi_set; } else if (strcmp(argv[i],"-Background") == 0) { cmd = _wrap_PDF_image_Background_set; } else if (strcmp(argv[i],"-transparent") == 0) { cmd = _wrap_PDF_image_transparent_set; } else if (strcmp(argv[i],"-delayTime") == 0) { cmd = _wrap_PDF_image_delayTime_set; } else if (strcmp(argv[i],"-inputFlag") == 0) { cmd = _wrap_PDF_image_inputFlag_set; } else if (strcmp(argv[i],"-disposal") == 0) { cmd = _wrap_PDF_image_disposal_set; } else if (strcmp(argv[i],"-useGlobalColormap") == 0) { cmd = _wrap_PDF_image_useGlobalColormap_set; } else if (strcmp(argv[i],"-bitPixel") == 0) { cmd = _wrap_PDF_image_bitPixel_set; } else if (strcmp(argv[i],"-interlace") == 0) { cmd = _wrap_PDF_image_interlace_set; } else if (strcmp(argv[i],"-imageno") == 0) { cmd = _wrap_PDF_image_imageno_set; } else if (strcmp(argv[i],"-no") == 0) { cmd = _wrap_PDF_image_no_set; } else if (strcmp(argv[i],"-src") == 0) { cmd = _wrap_PDF_image_src_set; } if (cmd) { oldarg = argv[i]; argv[i] = &temp[0]; rcode = (*cmd)(clientData,interp,3,&argv[i-1]); argv[i] = oldarg; if (rcode == TCL_ERROR) return rcode; cmd = 0; } else { Tcl_SetResult(interp,"Invalid configure option. Must be { -fp -filename -width -height -bpc -components -compression -colorspace -indexed -BitPixel -adobe -startpos -dpi -Background -transparent -delayTime -inputFlag -disposal -useGlobalColormap -bitPixel -interlace -imageno -no -src }",TCL_STATIC); return TCL_ERROR; } i+=2; } if ((i < argc) || (i == 2)) { Tcl_SetResult(interp,"{ -fp -filename -width -height -bpc -components -compression -colorspace -indexed -BitPixel -adobe -startpos -dpi -Background -transparent -delayTime -inputFlag -disposal -useGlobalColormap -bitPixel -interlace -imageno -no -src }",TCL_STATIC); return TCL_ERROR; } return TCL_OK; } else if ((c == 'c') && (strncmp(argv[1],"cget",length) == 0) && (length >= 2)) { if (argc == 3) { if (0) {} if (strcmp(argv[2],"-fp") == 0) { cmd = _wrap_PDF_image_fp_get; } else if (strcmp(argv[2],"-filename") == 0) { cmd = _wrap_PDF_image_filename_get; } else if (strcmp(argv[2],"-width") == 0) { cmd = _wrap_PDF_image_width_get; } else if (strcmp(argv[2],"-height") == 0) { cmd = _wrap_PDF_image_height_get; } else if (strcmp(argv[2],"-bpc") == 0) { cmd = _wrap_PDF_image_bpc_get; } else if (strcmp(argv[2],"-components") == 0) { cmd = _wrap_PDF_image_components_get; } else if (strcmp(argv[2],"-compression") == 0) { cmd = _wrap_PDF_image_compression_get; } else if (strcmp(argv[2],"-colorspace") == 0) { cmd = _wrap_PDF_image_colorspace_get; } else if (strcmp(argv[2],"-indexed") == 0) { cmd = _wrap_PDF_image_indexed_get; } else if (strcmp(argv[2],"-BitPixel") == 0) { cmd = _wrap_PDF_image_BitPixel_get; } else if (strcmp(argv[2],"-colormap") == 0) { cmd = _wrap_PDF_image_colormap_get; } else if (strcmp(argv[2],"-adobe") == 0) { cmd = _wrap_PDF_image_adobe_get; } else if (strcmp(argv[2],"-startpos") == 0) { cmd = _wrap_PDF_image_startpos_get; } else if (strcmp(argv[2],"-dpi") == 0) { cmd = _wrap_PDF_image_dpi_get; } else if (strcmp(argv[2],"-Background") == 0) { cmd = _wrap_PDF_image_Background_get; } else if (strcmp(argv[2],"-transparent") == 0) { cmd = _wrap_PDF_image_transparent_get; } else if (strcmp(argv[2],"-delayTime") == 0) { cmd = _wrap_PDF_image_delayTime_get; } else if (strcmp(argv[2],"-inputFlag") == 0) { cmd = _wrap_PDF_image_inputFlag_get; } else if (strcmp(argv[2],"-disposal") == 0) { cmd = _wrap_PDF_image_disposal_get; } else if (strcmp(argv[2],"-useGlobalColormap") == 0) { cmd = _wrap_PDF_image_useGlobalColormap_get; } else if (strcmp(argv[2],"-bitPixel") == 0) { cmd = _wrap_PDF_image_bitPixel_get; } else if (strcmp(argv[2],"-interlace") == 0) { cmd = _wrap_PDF_image_interlace_get; } else if (strcmp(argv[2],"-imageno") == 0) { cmd = _wrap_PDF_image_imageno_get; } else if (strcmp(argv[2],"-no") == 0) { cmd = _wrap_PDF_image_no_get; } else if (strcmp(argv[2],"-src") == 0) { cmd = _wrap_PDF_image_src_get; } else if (strcmp(argv[2],"-this") == 0) { SWIG_MakePtr(interp->result,(void *) clientData, "_PDF_image_p"); return TCL_OK; } if (cmd) { oldarg = argv[2]; argv[2] = &temp[0]; rcode = (*cmd)(clientData,interp,argc-1,&argv[1]); argv[2] = oldarg; return rcode; } else { Tcl_SetResult(interp,"Invalid cget option. Must be { -this -fp -filename -width -height -bpc -components -compression -colorspace -indexed -BitPixel -colormap -adobe -startpos -dpi -Background -transparent -delayTime -inputFlag -disposal -useGlobalColormap -bitPixel -interlace -imageno -no -src }",TCL_STATIC); return TCL_ERROR; } } else { Tcl_SetResult(interp,"{ -this -fp -filename -width -height -bpc -components -compression -colorspace -indexed -BitPixel -colormap -adobe -startpos -dpi -Background -transparent -delayTime -inputFlag -disposal -useGlobalColormap -bitPixel -interlace -imageno -no -src }", TCL_STATIC); return TCL_ERROR; } } if (!cmd) { Tcl_SetResult(interp,"Invalid Method. Must be { cget configure }",TCL_STATIC); return TCL_ERROR; } oldarg = argv[1]; argv[1] = &temp[0]; rcode = (*cmd)(clientData,interp,argc,argv); argv[1] = oldarg; return rcode; } /* objcmd.swg : Tcl object creation */ static int TclPDF_imageCmd(ClientData clientData, Tcl_Interp *interp, int argc, char **argv) { void (*del)(ClientData) = 0; char *name = 0; int (*cmd)(ClientData, Tcl_Interp *, int, char **) = 0; PDF_image * newObj = 0; int firstarg = 0; int thisarg = 0; if (argc == 1) { cmd = 0; } else { if (strcmp(argv[1],"-this") == 0) thisarg = 2; else if (strcmp(argv[1],"-args") == 0) { firstarg = 1; cmd = 0; } else if (argc == 2) { firstarg = 1; name = argv[1]; cmd = 0; } else if (argc >= 3) { name = argv[1]; if (strcmp(argv[2],"-this") == 0) thisarg = 3; else { firstarg = 1; cmd = 0; } } } if (cmd) { int result; result = (*cmd)(clientData,interp,argc-firstarg,&argv[firstarg]); if (result == TCL_OK) { SWIG_GetPtr(interp->result,(void **) &newObj,"_PDF_image_p"); } else { return result; } if (!name) name = interp->result; del = 0; } else if (thisarg > 0) { if (thisarg < argc) { char *r; r = SWIG_GetPtr(argv[thisarg],(void **) &newObj,"_PDF_image_p"); if (r) { interp->result = "Type error. not a PDF_image object."; return TCL_ERROR; } if (!name) name = argv[thisarg]; /* Return value is same as pointer value */ Tcl_SetResult(interp,argv[thisarg],TCL_VOLATILE); } else { interp->result = "wrong # args."; return TCL_ERROR; } } else { interp->result = "No constructor available."; return TCL_ERROR; } { Tcl_CmdInfo dummy; if (!Tcl_GetCommandInfo(interp,name,&dummy)) { Tcl_CreateCommand(interp,name, TclPDF_imageMethodCmd, (ClientData) newObj, del); return TCL_OK; } else { Tcl_SetResult(interp,"",TCL_VOLATILE); Tcl_AppendResult(interp,"Object ", name, " already exists!", (char *) NULL); return TCL_ERROR; } } } SWIGEXPORT(int,Pdflib_Init)(Tcl_Interp *interp) { if (interp == 0) return TCL_ERROR; Tcl_PkgProvide(interp, "pdflib", "0.6"); Tcl_LinkVar(interp, SWIG_prefix "PDFLIB_VERSION", (char *) &_wrap_const_PDFLIB_VERSION, TCL_LINK_STRING | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "PDF_DEFAULT_FONT_PATH", (char *) &_wrap_const_PDF_DEFAULT_FONT_PATH, TCL_LINK_STRING | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "false", (char *) &_wrap_const_false, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "true", (char *) &_wrap_const_true, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "PDF_INFO", (char *) &_wrap_const_PDF_INFO, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "PDF_WARN", (char *) &_wrap_const_PDF_WARN, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "PDF_FATAL", (char *) &_wrap_const_PDF_FATAL, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "PDF_INTERNAL", (char *) &_wrap_const_PDF_INTERNAL, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "PDF1_0", (char *) &_wrap_const_PDF1_0, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "PDF1_1", (char *) &_wrap_const_PDF1_1, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "PDF1_2", (char *) &_wrap_const_PDF1_2, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "builtin", (char *) &_wrap_const_builtin, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "pdfdoc", (char *) &_wrap_const_pdfdoc, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "macroman", (char *) &_wrap_const_macroman, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "macexpert", (char *) &_wrap_const_macexpert, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "winansi", (char *) &_wrap_const_winansi, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "encoding_count", (char *) &_wrap_const_encoding_count, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "none", (char *) &_wrap_const_none, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "lzw", (char *) &_wrap_const_lzw, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "runlength", (char *) &_wrap_const_runlength, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "ccitt", (char *) &_wrap_const_ccitt, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "dct", (char *) &_wrap_const_dct, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "flate", (char *) &_wrap_const_flate, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "compression_count", (char *) &_wrap_const_compression_count, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "trans_none", (char *) &_wrap_const_trans_none, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "trans_split", (char *) &_wrap_const_trans_split, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "trans_blinds", (char *) &_wrap_const_trans_blinds, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "trans_box", (char *) &_wrap_const_trans_box, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "trans_wipe", (char *) &_wrap_const_trans_wipe, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "trans_dissolve", (char *) &_wrap_const_trans_dissolve, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "trans_glitter", (char *) &_wrap_const_trans_glitter, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "trans_replace", (char *) &_wrap_const_trans_replace, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "transition_count", (char *) &_wrap_const_transition_count, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "DeviceGray", (char *) &_wrap_const_DeviceGray, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "DeviceRGB", (char *) &_wrap_const_DeviceRGB, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "DeviceCMYK", (char *) &_wrap_const_DeviceCMYK, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "CalGray", (char *) &_wrap_const_CalGray, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "CalRGB", (char *) &_wrap_const_CalRGB, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "Lab", (char *) &_wrap_const_Lab, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "Indexed", (char *) &_wrap_const_Indexed, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "Pattern", (char *) &_wrap_const_Pattern, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "Separation", (char *) &_wrap_const_Separation, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_LinkVar(interp, SWIG_prefix "colorspace_count", (char *) &_wrap_const_colorspace_count, TCL_LINK_INT | TCL_LINK_READ_ONLY); Tcl_CreateCommand(interp, SWIG_prefix "a0_set", _wrap_a0_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a0_get", _wrap_a0_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a1_set", _wrap_a1_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a1_get", _wrap_a1_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a2_set", _wrap_a2_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a2_get", _wrap_a2_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a3_set", _wrap_a3_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a3_get", _wrap_a3_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a4_set", _wrap_a4_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a4_get", _wrap_a4_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a5_set", _wrap_a5_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a5_get", _wrap_a5_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a6_set", _wrap_a6_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "a6_get", _wrap_a6_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "b5_set", _wrap_b5_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "b5_get", _wrap_b5_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "letter_set", _wrap_letter_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "letter_get", _wrap_letter_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "legal_set", _wrap_legal_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "legal_get", _wrap_legal_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "ledger_set", _wrap_ledger_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "ledger_get", _wrap_ledger_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "p11x17_set", _wrap_p11x17_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "p11x17_get", _wrap_p11x17_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_get_info", _wrap_PDF_get_info, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_open", _wrap_PDF_open, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_close", _wrap_PDF_close, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_begin_page", _wrap_PDF_begin_page, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_end_page", _wrap_PDF_end_page, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_set_transition", _wrap_PDF_set_transition, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_set_duration", _wrap_PDF_set_duration, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_malloc", _wrap_PDF_malloc, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_free", _wrap_PDF_free, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_show", _wrap_PDF_show, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_show_xy", _wrap_PDF_show_xy, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_set_font", _wrap_PDF_set_font, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_set_leading", _wrap_PDF_set_leading, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_set_text_rise", _wrap_PDF_set_text_rise, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_set_horiz_scaling", _wrap_PDF_set_horiz_scaling, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_set_text_rendering", _wrap_PDF_set_text_rendering, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_set_text_matrix", _wrap_PDF_set_text_matrix, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_set_text_pos", _wrap_PDF_set_text_pos, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_set_char_spacing", _wrap_PDF_set_char_spacing, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_set_word_spacing", _wrap_PDF_set_word_spacing, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_continue_text", _wrap_PDF_continue_text, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_save", _wrap_PDF_save, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_restore", _wrap_PDF_restore, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_translate", _wrap_PDF_translate, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_scale", _wrap_PDF_scale, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_rotate", _wrap_PDF_rotate, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setdash", _wrap_PDF_setdash, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setpolydash", _wrap_PDF_setpolydash, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setflat", _wrap_PDF_setflat, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setlinejoin", _wrap_PDF_setlinejoin, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setlinecap", _wrap_PDF_setlinecap, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setmiterlimit", _wrap_PDF_setmiterlimit, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setlinewidth", _wrap_PDF_setlinewidth, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setgray_fill", _wrap_PDF_setgray_fill, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setgray_stroke", _wrap_PDF_setgray_stroke, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setgray", _wrap_PDF_setgray, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setrgbcolor_fill", _wrap_PDF_setrgbcolor_fill, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setrgbcolor_stroke", _wrap_PDF_setrgbcolor_stroke, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_setrgbcolor", _wrap_PDF_setrgbcolor, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_moveto", _wrap_PDF_moveto, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_lineto", _wrap_PDF_lineto, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_curveto", _wrap_PDF_curveto, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_circle", _wrap_PDF_circle, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_arc", _wrap_PDF_arc, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_rect", _wrap_PDF_rect, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_closepath", _wrap_PDF_closepath, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_stroke", _wrap_PDF_stroke, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_closepath_stroke", _wrap_PDF_closepath_stroke, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_fill", _wrap_PDF_fill, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_fill_stroke", _wrap_PDF_fill_stroke, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_closepath_fill_stroke", _wrap_PDF_closepath_fill_stroke, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_endpath", _wrap_PDF_endpath, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_clip", _wrap_PDF_clip, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_place_image", _wrap_PDF_place_image, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_place_inline_image", _wrap_PDF_place_inline_image, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_put_image", _wrap_PDF_put_image, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_execute_image", _wrap_PDF_execute_image, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_close_image", _wrap_PDF_close_image, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_open_JPEG", _wrap_PDF_open_JPEG, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_close_JPEG", _wrap_PDF_close_JPEG, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_open_TIFF", _wrap_PDF_open_TIFF, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_close_TIFF", _wrap_PDF_close_TIFF, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_open_GIF", _wrap_PDF_open_GIF, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_close_GIF", _wrap_PDF_close_GIF, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_from_buf", _wrap_PDF_data_source_from_buf, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_stringwidth", _wrap_PDF_stringwidth, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_add_outline", _wrap_PDF_add_outline, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "fopen", _wrap_fopen, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "fclose", _wrap_fclose, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_pagesize_width_set", _wrap_PDF_pagesize_width_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_pagesize_width_get", _wrap_PDF_pagesize_width_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_pagesize_height_set", _wrap_PDF_pagesize_height_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_pagesize_height_get", _wrap_PDF_pagesize_height_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_pagesize",TclPDF_pagesizeCmd, (ClientData) NULL, NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_binary_mode_set", _wrap_PDF_info_binary_mode_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_binary_mode_get", _wrap_PDF_info_binary_mode_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_required_compatibility_set", _wrap_PDF_info_required_compatibility_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_required_compatibility_get", _wrap_PDF_info_required_compatibility_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_Keywords_set", _wrap_PDF_info_Keywords_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_Keywords_get", _wrap_PDF_info_Keywords_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_Subject_set", _wrap_PDF_info_Subject_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_Subject_get", _wrap_PDF_info_Subject_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_ModDate_set", _wrap_PDF_info_ModDate_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_ModDate_get", _wrap_PDF_info_ModDate_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_Title_set", _wrap_PDF_info_Title_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_Title_get", _wrap_PDF_info_Title_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_CreationDate_set", _wrap_PDF_info_CreationDate_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_CreationDate_get", _wrap_PDF_info_CreationDate_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_Creator_set", _wrap_PDF_info_Creator_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_Creator_get", _wrap_PDF_info_Creator_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_LinkVar(interp, SWIG_prefix "PDF_info_Producer", (char *) &_wrap_const_PDF_info_Producer, TCL_LINK_STRING | TCL_LINK_READ_ONLY); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_Author_set", _wrap_PDF_info_Author_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_Author_get", _wrap_PDF_info_Author_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_fontpath_set", _wrap_PDF_info_fontpath_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info_fontpath_get", _wrap_PDF_info_fontpath_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_info",TclPDF_infoCmd, (ClientData) NULL, NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_a_set", _wrap_PDF_matrix_a_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_a_get", _wrap_PDF_matrix_a_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_b_set", _wrap_PDF_matrix_b_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_b_get", _wrap_PDF_matrix_b_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_c_set", _wrap_PDF_matrix_c_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_c_get", _wrap_PDF_matrix_c_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_d_set", _wrap_PDF_matrix_d_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_d_get", _wrap_PDF_matrix_d_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_e_set", _wrap_PDF_matrix_e_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_e_get", _wrap_PDF_matrix_e_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_f_set", _wrap_PDF_matrix_f_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix_f_get", _wrap_PDF_matrix_f_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_matrix",TclPDF_matrixCmd, (ClientData) NULL, NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_s_next_byte_set", _wrap_PDF_data_source_s_next_byte_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_s_next_byte_get", _wrap_PDF_data_source_s_next_byte_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_s_bytes_available_set", _wrap_PDF_data_source_s_bytes_available_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_s_bytes_available_get", _wrap_PDF_data_source_s_bytes_available_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_s_buffer_start_set", _wrap_PDF_data_source_s_buffer_start_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_s_buffer_start_get", _wrap_PDF_data_source_s_buffer_start_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_s_buffer_length_set", _wrap_PDF_data_source_s_buffer_length_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_s_buffer_length_get", _wrap_PDF_data_source_s_buffer_length_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_s_private_data_set", _wrap_PDF_data_source_s_private_data_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_s_private_data_get", _wrap_PDF_data_source_s_private_data_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_data_source_s",TclPDF_data_source_sCmd, (ClientData) NULL, NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_fp_set", _wrap_PDF_image_fp_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_fp_get", _wrap_PDF_image_fp_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_filename_set", _wrap_PDF_image_filename_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_filename_get", _wrap_PDF_image_filename_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_width_set", _wrap_PDF_image_width_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_width_get", _wrap_PDF_image_width_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_height_set", _wrap_PDF_image_height_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_height_get", _wrap_PDF_image_height_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_bpc_set", _wrap_PDF_image_bpc_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_bpc_get", _wrap_PDF_image_bpc_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_components_set", _wrap_PDF_image_components_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_components_get", _wrap_PDF_image_components_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_compression_set", _wrap_PDF_image_compression_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_compression_get", _wrap_PDF_image_compression_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_colorspace_set", _wrap_PDF_image_colorspace_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_colorspace_get", _wrap_PDF_image_colorspace_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_indexed_set", _wrap_PDF_image_indexed_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_indexed_get", _wrap_PDF_image_indexed_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_BitPixel_set", _wrap_PDF_image_BitPixel_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_BitPixel_get", _wrap_PDF_image_BitPixel_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_colormap_get", _wrap_PDF_image_colormap_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_adobe_set", _wrap_PDF_image_adobe_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_adobe_get", _wrap_PDF_image_adobe_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_startpos_set", _wrap_PDF_image_startpos_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_startpos_get", _wrap_PDF_image_startpos_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_dpi_set", _wrap_PDF_image_dpi_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_dpi_get", _wrap_PDF_image_dpi_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_Background_set", _wrap_PDF_image_Background_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_Background_get", _wrap_PDF_image_Background_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_transparent_set", _wrap_PDF_image_transparent_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_transparent_get", _wrap_PDF_image_transparent_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_delayTime_set", _wrap_PDF_image_delayTime_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_delayTime_get", _wrap_PDF_image_delayTime_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_inputFlag_set", _wrap_PDF_image_inputFlag_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_inputFlag_get", _wrap_PDF_image_inputFlag_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_disposal_set", _wrap_PDF_image_disposal_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_disposal_get", _wrap_PDF_image_disposal_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_useGlobalColormap_set", _wrap_PDF_image_useGlobalColormap_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_useGlobalColormap_get", _wrap_PDF_image_useGlobalColormap_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_bitPixel_set", _wrap_PDF_image_bitPixel_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_bitPixel_get", _wrap_PDF_image_bitPixel_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_interlace_set", _wrap_PDF_image_interlace_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_interlace_get", _wrap_PDF_image_interlace_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_imageno_set", _wrap_PDF_image_imageno_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_imageno_get", _wrap_PDF_image_imageno_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_no_set", _wrap_PDF_image_no_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_no_get", _wrap_PDF_image_no_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_src_set", _wrap_PDF_image_src_set, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image_src_get", _wrap_PDF_image_src_get, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL); Tcl_CreateCommand(interp, SWIG_prefix "PDF_image",TclPDF_imageCmd, (ClientData) NULL, NULL); /* * These are the pointer type-equivalency mappings. * (Used by the SWIG pointer type-checker). */ SWIG_RegisterMapping("_signed_long","_long",0); SWIG_RegisterMapping("_struct_PDF_s","_PDF",0); SWIG_RegisterMapping("_struct_PDF_data_source_s","_PDF_data_source_s",0); SWIG_RegisterMapping("_struct_PDF_data_source_s","_PDF_data_source",0); SWIG_RegisterMapping("_byte","_unsigned_char",0); SWIG_RegisterMapping("_char_pp","_PDF_encodingvector",0); SWIG_RegisterMapping("_long","_unsigned_long",0); SWIG_RegisterMapping("_long","_signed_long",0); SWIG_RegisterMapping("_PDF","_struct_PDF_s",0); SWIG_RegisterMapping("_struct_PDF_image_t","_PDF_image",0); SWIG_RegisterMapping("_struct_PDF_image_t","_PDF_image_t",0); SWIG_RegisterMapping("_PDF_data_source","_struct_PDF_data_source_s",0); SWIG_RegisterMapping("_PDF_image","_struct_PDF_image_t",0); SWIG_RegisterMapping("_PDF_image","_PDF_image_t",0); SWIG_RegisterMapping("_unsigned_long","_long",0); SWIG_RegisterMapping("_pdf_colormap","_byte_p",0); SWIG_RegisterMapping("_PDF_encodingvector","_char_pp",0); SWIG_RegisterMapping("_signed_int","_int",0); SWIG_RegisterMapping("_unsigned_short","_short",0); SWIG_RegisterMapping("_signed_short","_short",0); SWIG_RegisterMapping("_unsigned_char","_byte",0); SWIG_RegisterMapping("_unsigned_int","_int",0); SWIG_RegisterMapping("_short","_unsigned_short",0); SWIG_RegisterMapping("_short","_signed_short",0); SWIG_RegisterMapping("_int","_unsigned_int",0); SWIG_RegisterMapping("_int","_signed_int",0); SWIG_RegisterMapping("_PDF_data_source_s","_struct_PDF_data_source_s",0); SWIG_RegisterMapping("_PDF_image_t","_PDF_image",0); SWIG_RegisterMapping("_PDF_image_t","_struct_PDF_image_t",0); SWIG_RegisterMapping("_byte_p","_pdf_colormap",0); { char cmd[] = "PDF_pagesize a0 -this [a0_get ]"; Tcl_GlobalEval(interp,cmd); } { char cmd[] = "PDF_pagesize a1 -this [a1_get ]"; Tcl_GlobalEval(interp,cmd); } { char cmd[] = "PDF_pagesize a2 -this [a2_get ]"; Tcl_GlobalEval(interp,cmd); } { char cmd[] = "PDF_pagesize a3 -this [a3_get ]"; Tcl_GlobalEval(interp,cmd); } { char cmd[] = "PDF_pagesize a4 -this [a4_get ]"; Tcl_GlobalEval(interp,cmd); } { char cmd[] = "PDF_pagesize a5 -this [a5_get ]"; Tcl_GlobalEval(interp,cmd); } { char cmd[] = "PDF_pagesize a6 -this [a6_get ]"; Tcl_GlobalEval(interp,cmd); } { char cmd[] = "PDF_pagesize b5 -this [b5_get ]"; Tcl_GlobalEval(interp,cmd); } { char cmd[] = "PDF_pagesize letter -this [letter_get ]"; Tcl_GlobalEval(interp,cmd); } { char cmd[] = "PDF_pagesize legal -this [legal_get ]"; Tcl_GlobalEval(interp,cmd); } { char cmd[] = "PDF_pagesize ledger -this [ledger_get ]"; Tcl_GlobalEval(interp,cmd); } { char cmd[] = "PDF_pagesize p11x17 -this [p11x17_get ]"; Tcl_GlobalEval(interp,cmd); } return TCL_OK; }