diff options
| author | dgp <dgp@noemail.net> | 2002-01-15 17:55:28 (GMT) |
|---|---|---|
| committer | dgp <dgp@noemail.net> | 2002-01-15 17:55:28 (GMT) |
| commit | 5b4d1516e3f1423e34da058f77c6aa959285fcbe (patch) | |
| tree | 1b8e5662ba53f74c7365043b21833a6534056f98 /generic/tclInt.h | |
| parent | 11d84d5f8dac317f3ea2b12080f3e920d193ab61 (diff) | |
| download | tcl-5b4d1516e3f1423e34da058f77c6aa959285fcbe.zip tcl-5b4d1516e3f1423e34da058f77c6aa959285fcbe.tar.gz tcl-5b4d1516e3f1423e34da058f77c6aa959285fcbe.tar.bz2 | |
* Updated APIs in the file generic/tclIO.c according to the guidelines
of TIP 27. Several minor documentation corrections as well.
* Updated channel driver interface according to the guidelines of
TIP 27. See also [Bug 500348].
* Moved Tcl_EolTranslation enum declaration from generic/tcl.h to
generic/tclInt.h (renamed to TclEolTranslation). It is not used
anywhere in Tcl's public interface.
FossilOrigin-Name: 9c9edf24ebc9ced7a348fbf0bc524fa36c851598
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 17 |
1 files changed, 15 insertions, 2 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 80984a6..4c85ba6 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclInt.h,v 1.73 2002/01/09 19:09:28 kennykb Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.74 2002/01/15 17:55:30 dgp Exp $ */ #ifndef _TCLINT @@ -1432,7 +1432,7 @@ typedef struct ParseValue { #define TCL_ALIGN(x) (((int)(x) + 7) & ~7) /* - * The following macros are used to specify the runtime platform + * The following enum values are used to specify the runtime platform * setting of the tclPlatform variable. */ @@ -1443,6 +1443,19 @@ typedef enum { } TclPlatformType; /* + * The following enum values are used to indicate the translation + * of a Tcl channel. Declared here so that each platform can define + * TCL_PLATFORM_TRANSLATION to the native translation on that platform + */ + +typedef enum TclEolTranslation { + TCL_TRANSLATE_AUTO, /* Eol == \r, \n and \r\n. */ + TCL_TRANSLATE_CR, /* Eol == \r. */ + TCL_TRANSLATE_LF, /* Eol == \n. */ + TCL_TRANSLATE_CRLF /* Eol == \r\n. */ +} TclEolTranslation; + +/* * Flags for TclInvoke: * * TCL_INVOKE_HIDDEN Invoke a hidden command; if not set, |