diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-11-24 13:33:32 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-11-24 13:33:32 (GMT) |
| commit | d38a0b78165c57c6689c651906b1306d53f6e2fa (patch) | |
| tree | c31c31ed93eef3324143f524ddc5972b7340569d /generic/tclBasic.c | |
| parent | a69b96ecbb110463c843208820c24b4f1eb04f2e (diff) | |
| download | tcl-d38a0b78165c57c6689c651906b1306d53f6e2fa.zip tcl-d38a0b78165c57c6689c651906b1306d53f6e2fa.tar.gz tcl-d38a0b78165c57c6689c651906b1306d53f6e2fa.tar.bz2 | |
Make compileEpoch "unsigned int", and start counting at 1.
Diffstat (limited to 'generic/tclBasic.c')
| -rw-r--r-- | generic/tclBasic.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index 8eebab1..c1dd52d 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -588,7 +588,7 @@ Tcl_CreateInterp(void) iPtr->cmdCount = 0; TclInitLiteralTable(&iPtr->literalTable); - iPtr->compileEpoch = 0; + iPtr->compileEpoch = 1; iPtr->compiledProcPtr = NULL; iPtr->resolverPtr = NULL; iPtr->evalFlags = 0; |