diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2008-12-05 14:27:35 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2008-12-05 14:27:35 (GMT) |
| commit | ce2d0cb7086d505a6a8bab25315b986de0c0250f (patch) | |
| tree | d44346c2b3d010032608138d792f67b0d4f13c6d /generic/tclResult.c | |
| parent | a59513000fb2307fa6951642beb7bed484cd06ca (diff) | |
| download | tcl-ce2d0cb7086d505a6a8bab25315b986de0c0250f.zip tcl-ce2d0cb7086d505a6a8bab25315b986de0c0250f.tar.gz tcl-ce2d0cb7086d505a6a8bab25315b986de0c0250f.tar.bz2 | |
Implement TIP#307.
Diffstat (limited to 'generic/tclResult.c')
| -rw-r--r-- | generic/tclResult.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclResult.c b/generic/tclResult.c index 8e85035..debb3f4 100644 --- a/generic/tclResult.c +++ b/generic/tclResult.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: tclResult.c,v 1.52 2008/12/02 19:40:41 dgp Exp $ + * RCS: @(#) $Id: tclResult.c,v 1.53 2008/12/05 14:27:36 dkf Exp $ */ #include "tclInt.h" @@ -1556,7 +1556,7 @@ Tcl_SetReturnOptions( /* *------------------------------------------------------------------------- * - * TclTransferResult -- + * Tcl_TransferResult -- * * Copy the result (and error information) from one interp to another. * Used when one interp has caused another interp to evaluate a script @@ -1582,7 +1582,7 @@ Tcl_SetReturnOptions( */ void -TclTransferResult( +Tcl_TransferResult( Tcl_Interp *sourceInterp, /* Interp whose result and error information * should be moved to the target interp. * After moving result, this interp's result |