diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2013-02-04 22:02:53 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2013-02-04 22:02:53 (GMT) |
| commit | 773774fce50f6f2557e760920a25ee1390030f62 (patch) | |
| tree | e514fbd26c2901b73a5c635c59e70aeaba42775b /generic/tclCompile.c | |
| parent | 63b156401266f39ec7c365eba643e93e2c2dcf7d (diff) | |
| parent | bf2291f4894809bd06423d57d9ffbf0ed24eed3a (diff) | |
| download | tcl-773774fce50f6f2557e760920a25ee1390030f62.zip tcl-773774fce50f6f2557e760920a25ee1390030f62.tar.gz tcl-773774fce50f6f2557e760920a25ee1390030f62.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic/tclCompile.c')
| -rw-r--r-- | generic/tclCompile.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index 33d67ff..4069cf0 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -789,8 +789,7 @@ SetByteCodeFromAny( if (interp == NULL) { return TCL_ERROR; } - TclSetByteCodeFromAny(interp, objPtr, NULL, NULL); - return TCL_OK; + return TclSetByteCodeFromAny(interp, objPtr, NULL, NULL); } /* |