summaryrefslogtreecommitdiffstats
path: root/tkimg/libpng/pngtclStubLib.c
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2017-01-03 21:51:01 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2017-01-03 21:51:01 (GMT)
commita780057cc1b51dd3a557549c3cf2431f09136c0d (patch)
tree717f78052c55596449b27743171d7e170c4d39a0 /tkimg/libpng/pngtclStubLib.c
parent7749430b9352c1eaf5dca7d8a89a6d35f565ef24 (diff)
downloadblt-a780057cc1b51dd3a557549c3cf2431f09136c0d.zip
blt-a780057cc1b51dd3a557549c3cf2431f09136c0d.tar.gz
blt-a780057cc1b51dd3a557549c3cf2431f09136c0d.tar.bz2
upgrade tkimg to 1.4.6
Diffstat (limited to 'tkimg/libpng/pngtclStubLib.c')
-rw-r--r--tkimg/libpng/pngtclStubLib.c62
1 files changed, 0 insertions, 62 deletions
diff --git a/tkimg/libpng/pngtclStubLib.c b/tkimg/libpng/pngtclStubLib.c
deleted file mode 100644
index b48de33..0000000
--- a/tkimg/libpng/pngtclStubLib.c
+++ /dev/null
@@ -1,62 +0,0 @@
-/*
- * pngtclStubLib.c --
- *
- * Stub object that will be statically linked into extensions that wish
- * to access the PNGTCL API.
- *
- * Copyright (c) 2002 Andreas Kupries <andreas_kupries@users.sourceforge.net>
- * Copyright (c) 2002 Andreas Kupries <andreas_kupries@users.sourceforge.net>
- *
- * See the file "license.terms" for information on usage and redistribution
- * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
- *
- * RCS: @(#) $Id: pngtclStubLib.c,v 1.1.1.1 2016/01/25 21:20:46 joye Exp $
- */
-
-#ifndef USE_TCL_STUBS
-#define USE_TCL_STUBS
-#endif
-
-#include "pngtcl.h"
-
-const PngtclStubs *pngtclStubsPtr;
-
-/*
- *----------------------------------------------------------------------
- *
- * Pngtcl_InitStubs --
- *
- * Checks that the correct version of Blt is loaded and that it
- * supports stubs. It then initialises the stub table pointers.
- *
- * Results:
- * The actual version of BLT that satisfies the request, or
- * NULL to indicate that an error occurred.
- *
- * Side effects:
- * Sets the stub table pointers.
- *
- *----------------------------------------------------------------------
- */
-
-#ifdef Pngtcl_InitStubs
-#undef Pngtcl_InitStubs
-#endif
-
-MODULE_SCOPE const char *
-Pngtcl_InitStubs(interp, version, exact)
- Tcl_Interp *interp;
- const char *version;
- int exact;
-{
- const char *result;
- ClientData data;
-
- result = Tcl_PkgRequireEx(interp, PACKAGE_NAME, (CONST84 char *) version, exact, &data);
- if (!result || !data) {
- return NULL;
- }
-
- pngtclStubsPtr = (const PngtclStubs *) data;
- return result;
-}