diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2001-07-12 13:15:09 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2001-07-12 13:15:09 (GMT) |
| commit | 70cdccb08c6d52be6add914db5844c25c9b92f0a (patch) | |
| tree | 3c3398315ca2c30b926058cb5dbf50de7dd0fd7c /generic/tcl.h | |
| parent | ca72133fb3d2bc04fc3174d379f1158b13c1ea10 (diff) | |
| download | tcl-70cdccb08c6d52be6add914db5844c25c9b92f0a.zip tcl-70cdccb08c6d52be6add914db5844c25c9b92f0a.tar.gz tcl-70cdccb08c6d52be6add914db5844c25c9b92f0a.tar.bz2 | |
TIP#36 implementation. Also includes cleanup for subst option
handling and improved documentation for the subst command (in my
capacity as maintainer of the Commands M-Z functional area.)
Diffstat (limited to 'generic/tcl.h')
| -rw-r--r-- | generic/tcl.h | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index 3e8a71a..a08cbc8 100644 --- a/generic/tcl.h +++ b/generic/tcl.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: tcl.h,v 1.91 2001/06/08 20:06:11 dgp Exp $ + * RCS: @(#) $Id: tcl.h,v 1.92 2001/07/12 13:15:09 dkf Exp $ */ #ifndef _TCL @@ -535,6 +535,15 @@ typedef struct stat *Tcl_Stat_; #define TCL_RESULT_SIZE 200 /* + * Flags to control what substitutions are performed by Tcl_SubstObj(): + */ + +#define TCL_SUBST_COMMANDS 001 +#define TCL_SUBST_VARIABLES 002 +#define TCL_SUBST_BACKSLASHES 004 +#define TCL_SUBST_ALL 007 + +/* * Argument descriptors for math function callbacks in expressions: */ |