diff options
| -rw-r--r-- | generic/regexec.c | 2 | ||||
| -rw-r--r-- | unix/tclUnixNotfy.c | 7 |
2 files changed, 4 insertions, 5 deletions
diff --git a/generic/regexec.c b/generic/regexec.c index 9424385..bac019d 100644 --- a/generic/regexec.c +++ b/generic/regexec.c @@ -265,7 +265,7 @@ struct colormap *cm; struct smalldfa sa; struct dfa *s = newdfa(v, &v->g->search, cm, &sa); chr *begin; - chr *end; + chr *end = NULL; /* needed to eliminate gcc warning */ chr *cold; chr *open; /* open and close of range of possible starts */ chr *close; diff --git a/unix/tclUnixNotfy.c b/unix/tclUnixNotfy.c index bbb34e0..5a0d222 100644 --- a/unix/tclUnixNotfy.c +++ b/unix/tclUnixNotfy.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixNotfy.c,v 1.3 1999/04/16 00:48:05 stanton Exp $ + * RCS: @(#) $Id: tclUnixNotfy.c,v 1.4 1999/06/10 04:27:44 stanton Exp $ */ #include "tclInt.h" @@ -366,14 +366,13 @@ Tcl_ServiceModeHook(mode) * * Tcl_CreateFileHandler -- * - * This procedure registers a file handler with the Xt notifier. + * This procedure registers a file handler with the select notifier. * * Results: * None. * * Side effects: - * Creates a new file handler structure and registers one or more - * input procedures with Xt. + * Creates a new file handler structure. * *---------------------------------------------------------------------- */ |