diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-11-30 14:14:01 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-11-30 14:14:01 (GMT) |
| commit | d7d31d6041d72ace8e80d409c12749ab819499ec (patch) | |
| tree | 150980efd89cc25387dcc44f088399b0c7b7f4a2 /generic/tclLink.c | |
| parent | e87d0bcdf463e1858295c83daaee867dd695dba0 (diff) | |
| download | tcl-d7d31d6041d72ace8e80d409c12749ab819499ec.zip tcl-d7d31d6041d72ace8e80d409c12749ab819499ec.tar.gz tcl-d7d31d6041d72ace8e80d409c12749ab819499ec.tar.bz2 | |
Don't provide the setFromAnyProc through the invalidRealType objType. This is a Tcl internal type, extensions shouldn't be able to convert their own Tcl_Obj to this. This shouldn't have been exposed to begin with. Tcl itself never calls it this way.
Diffstat (limited to 'generic/tclLink.c')
| -rw-r--r-- | generic/tclLink.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclLink.c b/generic/tclLink.c index 7d1e3a8..6f75849 100644 --- a/generic/tclLink.c +++ b/generic/tclLink.c @@ -638,7 +638,7 @@ static Tcl_ObjType invalidRealType = { NULL, /* freeIntRepProc */ NULL, /* dupIntRepProc */ NULL, /* updateStringProc */ - SetInvalidRealFromAny /* setFromAnyProc */ + NULL /* setFromAnyProc */ }; static int |