diff options
| author | Miguel Sofer <miguel.sofer@gmail.com> | 2009-03-21 11:46:09 (GMT) |
|---|---|---|
| committer | Miguel Sofer <miguel.sofer@gmail.com> | 2009-03-21 11:46:09 (GMT) |
| commit | 260a0df5b742697276b762bcddd34c141aed9942 (patch) | |
| tree | 0c34ebae61b4f51a200c06d73f1482a622601bae /generic/tclInt.h | |
| parent | 61e311e5b2192389f6791a15f4d1227769b95772 (diff) | |
| download | tcl-260a0df5b742697276b762bcddd34c141aed9942.zip tcl-260a0df5b742697276b762bcddd34c141aed9942.tar.gz tcl-260a0df5b742697276b762bcddd34c141aed9942.tar.bz2 | |
* tclInt.h: comments
* tests/tailcall.test: added tests to show that [tailcall] does
not currently always execute in constant space: interp-alias,
ns-imports and ensembles "leak" as of this commit.
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 3c45cc1..5c9e127 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -15,7 +15,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.420 2009/03/21 09:42:07 msofer Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.421 2009/03/21 11:46:10 msofer Exp $ */ #ifndef _TCLINT @@ -1059,9 +1059,7 @@ typedef struct CallFrame { struct TEOV_callback *tailcallPtr; /* The callback implementing the call to be * executed by the command that pushed this - * frame. It can be TAILCALL_NONE to signal - * that we are tailcalling a frame further up - * the stack. + * frame. */ } CallFrame; |