diff options
| author | das <das> | 2009-04-10 18:02:36 (GMT) |
|---|---|---|
| committer | das <das> | 2009-04-10 18:02:36 (GMT) |
| commit | 2858f83307b48cadf03d1ae69cb92820edf3e1cc (patch) | |
| tree | 73c1d2c98db1bdf47db23cff6bb36aad46156ef8 /unix/tclUnixChan.c | |
| parent | 9bdf20b285315e722860d65d2ada928f6ece07f0 (diff) | |
| download | tcl-2858f83307b48cadf03d1ae69cb92820edf3e1cc.zip tcl-2858f83307b48cadf03d1ae69cb92820edf3e1cc.tar.gz tcl-2858f83307b48cadf03d1ae69cb92820edf3e1cc.tar.bz2 | |
* macosx/tclMacOSXNotify.c: revise CoreFoundation notifier to allow
* unix/tclUnixChan.c: embedding into applications that
* unix/tclUnixEvent.c: already have a CFRunLoop running and
want to run the tcl event loop via
Tcl_ServiceModeHook(TCL_SERVICE_ALL).
* macosx/tclMacOSXNotify.c: add CFRunLoop based Tcl_Sleep() and
* unix/tclUnixChan.c: TclUnixWaitForFile() implementations
* unix/tclUnixEvent.c: and disable select() based ones in
CoreFoundation builds.
* unix/tclUnixNotify.c: simplify, sync with tclMacOSXNotify.c.
* generic/tclInt.decls: add TclMacOSXNotifierAddRunLoopMode()
* generic/tclIntPlatDecls.h: internal API, regen.
* generic/tclStubInit.c:
Diffstat (limited to 'unix/tclUnixChan.c')
| -rw-r--r-- | unix/tclUnixChan.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/unix/tclUnixChan.c b/unix/tclUnixChan.c index 51781c0..18faa99 100644 --- a/unix/tclUnixChan.c +++ b/unix/tclUnixChan.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixChan.c,v 1.97 2008/12/18 01:14:16 ferrieux Exp $ + * RCS: @(#) $Id: tclUnixChan.c,v 1.98 2009/04/10 18:02:37 das Exp $ */ #include "tclInt.h" /* Internal definitions for Tcl. */ @@ -3012,6 +3012,8 @@ Tcl_GetOpenFile( return TCL_ERROR; } +#ifndef HAVE_COREFOUNDATION /* Darwin/Mac OS X CoreFoundation notifier is + * in tclMacOSXNotify.c */ /* *---------------------------------------------------------------------- * @@ -3171,6 +3173,7 @@ TclUnixWaitForFile( } return result; } +#endif /* HAVE_COREFOUNDATION */ /* *---------------------------------------------------------------------- |