diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-04-29 19:29:14 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-04-29 19:29:14 (GMT) |
| commit | d41d08e1111a2353e98c6814043b6441e6e71b64 (patch) | |
| tree | afd15372be814df73b18bb4c139fee4cc1de2be2 /generic/tclCompile.h | |
| parent | 100542f06740e0120d51ef844f61d47b10ce39ef (diff) | |
| download | tcl-d41d08e1111a2353e98c6814043b6441e6e71b64.zip tcl-d41d08e1111a2353e98c6814043b6441e6e71b64.tar.gz tcl-d41d08e1111a2353e98c6814043b6441e6e71b64.tar.bz2 | |
Parameterize TclInitByteCodeObj to callers sense of typePtr.dgp_init_bytecode
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index af8d60f..f99c07c 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -1119,8 +1119,8 @@ MODULE_SCOPE int TclFixupForwardJump(CompileEnv *envPtr, MODULE_SCOPE void TclFreeCompileEnv(CompileEnv *envPtr); MODULE_SCOPE void TclFreeJumpFixupArray(JumpFixupArray *fixupArrayPtr); MODULE_SCOPE ByteCode * TclInitByteCode(CompileEnv *envPtr); -MODULE_SCOPE void TclInitByteCodeObj(Tcl_Obj *objPtr, - CompileEnv *envPtr); +MODULE_SCOPE ByteCode * TclInitByteCodeObj(Tcl_Obj *objPtr, + const Tcl_ObjType *typePtr, CompileEnv *envPtr); MODULE_SCOPE void TclInitCompileEnv(Tcl_Interp *interp, CompileEnv *envPtr, const char *string, int numBytes, const CmdFrame *invoker, int word); |