mirrors/cpython
0
0
Fork 0
mirror of https://github.com/python/cpython.git synced 2024-11-24 10:24:35 +08:00
Code Issues Packages Projects Releases Wiki Activity

Initialize GUSI on the mac.

Browse Source
This commit is contained in:
Jack Jansen 1995-11-14 10:34:45 +00:00
parent 8a5d0d4980
commit 40b546d40e
1 changed files with 21 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
Modules/_tkinter.c
View File

@ -13,6 +13,11 @@ static FSSpec library_fss;
#ifdef MAC_TCL
#define WITH_APPINIT
#ifdef __MWERKS__
void GUSISetup (void (*socketfamily)());
void GUSIwithInternetSockets (void);
void GUSIwithSIOUXSockets (void);
#endif
#endif
#define PyInit__tkinter init_tkinter
@ -1271,6 +1276,9 @@ PyInit__tkinter ()
if (Py_AtExit (Tkinter_Cleanup) != 0)
fprintf(stderr,
"Tkinter: warning: cleanup procedure not registered\n");
#ifdef __MWERKS__
PyTk_InitGUSI();
#endif
}
if (PyErr_Occurred ())
@ -1295,6 +1303,19 @@ panic(char * format, ...)
Py_FatalError("Tcl/Tk panic");
}
#ifdef __MWERKS__
void
PyTk_InitGUSI()
{
static int is_inited;
if ( is_inited ) return;
GUSISetup(GUSIwithInternetSockets);
GUSISetup(GUSIwithSIOUXSockets);
is_inited = 1;
}
#endif /* __MWERKS__ */
/*
** If this module is dynamically loaded the following routine should