diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2011-01-18 15:44:41 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2011-01-18 15:44:41 (GMT) |
| commit | 80a56f77a468841d49a8f4e04817cf36640cfd2b (patch) | |
| tree | 2f59c8c15c6d01469bf0d0e553f19097defcff49 /generic/tclOOMethod.c | |
| parent | c246782cc0bc14600f737dfc07d0bc3853d95dd4 (diff) | |
| download | tcl-80a56f77a468841d49a8f4e04817cf36640cfd2b.zip tcl-80a56f77a468841d49a8f4e04817cf36640cfd2b.tar.gz tcl-80a56f77a468841d49a8f4e04817cf36640cfd2b.tar.bz2 | |
Add missing comment
Diffstat (limited to 'generic/tclOOMethod.c')
| -rw-r--r-- | generic/tclOOMethod.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/tclOOMethod.c b/generic/tclOOMethod.c index 735ced9..bb10ca5 100644 --- a/generic/tclOOMethod.c +++ b/generic/tclOOMethod.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclOOMethod.c,v 1.30 2011/01/18 13:50:03 dkf Exp $ + * RCS: @(#) $Id: tclOOMethod.c,v 1.31 2011/01/18 15:44:41 dkf Exp $ */ #ifdef HAVE_CONFIG_H @@ -41,7 +41,8 @@ typedef struct { Tcl_Obj *nameObj; /* The "name" of the command. */ Command cmd; /* The command structure. Mostly bogus. */ ExtraFrameInfo efi; /* Extra information used for [info frame]. */ - Command *oldCmdPtr; + Command *oldCmdPtr; /* Saved cmdPtr so that we can be safe after a + * recursive call returns. */ struct PNI pni; /* Specialist information used in the efi * field for this type of call. */ } PMFrameData; |