diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2024-06-20 07:44:32 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2024-06-20 07:44:32 (GMT) |
| commit | e83954d81f5ad30df0736d1cb12f5240bb8e896c (patch) | |
| tree | bcc7064efa50ae367f8843e46d36b864e91b24af /generic/tcl.h | |
| parent | 2de684d18bf96b3de8c6e42f5aafbdb832096475 (diff) | |
| parent | 58e07be6174a8195b83da655731626e99b605c86 (diff) | |
| download | tcl-e83954d81f5ad30df0736d1cb12f5240bb8e896c.zip tcl-e83954d81f5ad30df0736d1cb12f5240bb8e896c.tar.gz tcl-e83954d81f5ad30df0736d1cb12f5240bb8e896c.tar.bz2 | |
Merge trunk
Diffstat (limited to 'generic/tcl.h')
| -rw-r--r-- | generic/tcl.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index b5630cc..c3f3516 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -515,6 +515,8 @@ typedef struct stat *Tcl_OldStat_; * exited; the interpreter's result is meaningless. * TCL_CONTINUE Go on to the next iteration of the current loop; the * interpreter's result is meaningless. + * Integer return codes in the range TCL_CODE_USER_MIN to TCL_CODE_USER_MAX are + * reserved for the use of packages. */ #define TCL_OK 0 @@ -522,6 +524,8 @@ typedef struct stat *Tcl_OldStat_; #define TCL_RETURN 2 #define TCL_BREAK 3 #define TCL_CONTINUE 4 +#define TCL_CODE_USER_MIN 5 +#define TCL_CODE_USER_MAX 0x3fffffff /* 1073741823 */ /* *---------------------------------------------------------------------------- |