diff options
| author | pooryorick <com.digitalsmarties@pooryorick.com> | 2017-11-19 00:06:51 (GMT) |
|---|---|---|
| committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2017-11-19 00:06:51 (GMT) |
| commit | 75924256c128fb94dc0cfbddf6d56fc89aeb10e7 (patch) | |
| tree | 5bdacef0009d730244d257cadfe654aac31c6b40 /generic/tclInt.h | |
| parent | 42c80667fd7da57b65d92fee77d2b954fba95970 (diff) | |
| download | tcl-75924256c128fb94dc0cfbddf6d56fc89aeb10e7.zip tcl-75924256c128fb94dc0cfbddf6d56fc89aeb10e7.tar.gz tcl-75924256c128fb94dc0cfbddf6d56fc89aeb10e7.tar.bz2 | |
Fix segmentation fault in TclOO that was noted in [16fe1b5807]. Update
coroutine and TclOO object creation routines to use TclCreateObjCommandInNs.
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 480ae5a..7078ba0 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2917,7 +2917,7 @@ MODULE_SCOPE void TclContinuationsCopy(Tcl_Obj *objPtr, Tcl_Obj *originObjPtr); MODULE_SCOPE int TclConvertElement(const char *src, int length, char *dst, int flags); -MODULE_SCOPE Tcl_Command tclCreateObjCommandInNs ( +MODULE_SCOPE Tcl_Command TclCreateObjCommandInNs ( Tcl_Interp *interp, const char *cmdName, Tcl_Namespace *nsPtr, @@ -2988,7 +2988,7 @@ MODULE_SCOPE double TclFloor(const mp_int *a); MODULE_SCOPE void TclFormatNaN(double value, char *buffer); MODULE_SCOPE int TclFSFileAttrIndex(Tcl_Obj *pathPtr, const char *attributeName, int *indexPtr); -MODULE_SCOPE Tcl_Command tclNRCreateCommandInNs ( +MODULE_SCOPE Tcl_Command TclNRCreateCommandInNs ( Tcl_Interp *interp, const char *cmdName, Tcl_Namespace *nsPtr, |