1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
|
/*
* The Python Imaging Library.
*
* tkinter hooks
*
* history:
* 99-07-26 fl created
* 99-08-15 fl moved to its own support module
*
* Copyright (c) Secret Labs AB 1999.
*
* See the README file for information on usage and redistribution.
*/
#include "Python.h"
#include "Imaging.h"
#include "tk.h"
/* must link with Tk/tkImaging.c */
extern void TkImaging_Init(Tcl_Interp* interp);
/* copied from _tkinter.c (this isn't as bad as it may seem: for new
versions, we use _tkinter's interpaddr hook instead, and all older
versions use this structure layout) */
typedef struct {
PyObject_HEAD
Tcl_Interp* interp;
} TkappObject;
static PyObject*
_tkinit(PyObject* self, PyObject* args)
{
Tcl_Interp* interp;
long arg;
int is_interp;
if (!PyArg_ParseTuple(args, "li", &arg, &is_interp))
return NULL;
if (is_interp)
interp = (Tcl_Interp*) arg;
else {
TkappObject* app;
/* Do it the hard way. This will break if the TkappObject
layout changes */
app = (TkappObject*) arg;
interp = app->interp;
}
/* This will bomb if interp is invalid... */
TkImaging_Init(interp);
Py_INCREF(Py_None);
return Py_None;
}
static PyMethodDef functions[] = {
/* Tkinter interface stuff */
{"tkinit", (PyCFunction)_tkinit, 1},
{NULL, NULL} /* sentinel */
};
DL_EXPORT(void)
init_imagingtk(void)
{
Py_InitModule("_imagingtk", functions);
}
|
