diff options
| author | nijtmans <nijtmans> | 2010-06-14 12:58:11 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2010-06-14 12:58:11 (GMT) |
| commit | ba4c323507b52826ed62219a2aefe71383a607dd (patch) | |
| tree | aab909940ea4d91fc0b6f8ca778f93996411e4c2 /unix/tclXtTest.c | |
| parent | aab1bdb3dea86d9aee3f11af43dd6a6b1a5ab9ee (diff) | |
| download | tcl-ba4c323507b52826ed62219a2aefe71383a607dd.zip tcl-ba4c323507b52826ed62219a2aefe71383a607dd.tar.gz tcl-ba4c323507b52826ed62219a2aefe71383a607dd.tar.bz2 | |
Fix compilation of xttest with 8.6 changes
tclPipe.c: Fix gcc warning (with -fstrict-aliasing=2)
Diffstat (limited to 'unix/tclXtTest.c')
| -rw-r--r-- | unix/tclXtTest.c | 16 |
1 files changed, 5 insertions, 11 deletions
diff --git a/unix/tclXtTest.c b/unix/tclXtTest.c index d4bef9e..54bcbcf 100644 --- a/unix/tclXtTest.c +++ b/unix/tclXtTest.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclXtTest.c,v 1.10 2010/02/25 22:20:10 nijtmans Exp $ + * RCS: @(#) $Id: tclXtTest.c,v 1.11 2010/06/14 12:58:11 nijtmans Exp $ */ #ifndef USE_TCL_STUBS @@ -19,19 +19,13 @@ static int TesteventloopCmd(ClientData clientData, Tcl_Interp *interp, int argc, const char **argv); -extern void InitNotifier(void); - +extern DLLEXPORT Tcl_PackageInitProc Tclxttest_Init; /* - * TCL_STORAGE_CLASS is set unconditionally to DLLEXPORT because the - * Tcltest_Init declaration is in the source file itself, which is only - * accessed when we are building a library. + * Functions defined in tclXtNotify.c for use by users of the Xt Notifier: */ -#undef TCL_STORAGE_CLASS -#define TCL_STORAGE_CLASS DLLEXPORT -EXTERN int Tclxttest_Init(Tcl_Interp *interp); - - +extern void InitNotifier(void); +extern XtAppContext TclSetAppContext(XtAppContext ctx); /* *---------------------------------------------------------------------- |