diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-04 06:54:24 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-04 06:54:24 (GMT) |
| commit | d409a29e57b2d4ced1bad4b0bb5bb1e2387f4120 (patch) | |
| tree | b94ae208eb9dfbc5fd5839c4a5fc7747ae5f2eb1 /generic/tclExecute.c | |
| parent | cc1e30158793a4c08f066242a62aeba0a777c263 (diff) | |
| download | tcl-d409a29e57b2d4ced1bad4b0bb5bb1e2387f4120.zip tcl-d409a29e57b2d4ced1bad4b0bb5bb1e2387f4120.tar.gz tcl-d409a29e57b2d4ced1bad4b0bb5bb1e2387f4120.tar.bz2 | |
Experiment: compile Tcl with C++ compiler. WIP
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 520c2ee..f47f8ea 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -1695,7 +1695,7 @@ TclCompileObj( eclPtr = Tcl_GetHashValue(hePtr); redo = 0; - ctxCopyPtr = TclStackAlloc(interp, sizeof(CmdFrame)); + ctxCopyPtr = (CmdFrame *)TclStackAlloc(interp, sizeof(CmdFrame)); *ctxCopyPtr = *invoker; if (invoker->type == TCL_LOCATION_BC) { |