diff options
Diffstat (limited to 'generic/tcl.h')
| -rw-r--r-- | generic/tcl.h | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index 41e68a8..183d2ca 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -515,6 +515,9 @@ 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_MIN to TCL_CODE_MAX are + * reserved for the use of Tcl. Extensions and packages are free to use + * values outside this range for their own purposes. */ #define TCL_OK 0 @@ -522,6 +525,8 @@ typedef struct stat *Tcl_OldStat_; #define TCL_RETURN 2 #define TCL_BREAK 3 #define TCL_CONTINUE 4 +#define TCL_CODE_MAX 0x40000000 +#define TCL_CODE_MIN (-TCL_CODE_MAX) /* *---------------------------------------------------------------------------- |