diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-03-01 21:59:23 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-03-01 21:59:23 (GMT) |
| commit | 0fefbc629fd43067499307e94978d8ab95fa9f74 (patch) | |
| tree | 4e690c542fe0e68904ad3becdb422d4c521991cb /macosx | |
| parent | f4c192b1b8852d61c12689fd891918197b21cd85 (diff) | |
| parent | 921a0bbbfb177411e3fe27f4c4654909fd599859 (diff) | |
| download | tcl-0fefbc629fd43067499307e94978d8ab95fa9f74.zip tcl-0fefbc629fd43067499307e94978d8ab95fa9f74.tar.gz tcl-0fefbc629fd43067499307e94978d8ab95fa9f74.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'macosx')
| -rw-r--r-- | macosx/tclMacOSXFCmd.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/macosx/tclMacOSXFCmd.c b/macosx/tclMacOSXFCmd.c index f6d39e1..a48d2a6 100644 --- a/macosx/tclMacOSXFCmd.c +++ b/macosx/tclMacOSXFCmd.c @@ -577,7 +577,7 @@ GetOSTypeFromObj( { int result = TCL_OK; - if (objPtr->typePtr != &tclOSTypeType) { + if (!TclHasIntRep(objPtr, &tclOSTypeType)) { result = SetOSTypeFromAny(interp, objPtr); } *osTypePtr = (OSType) objPtr->internalRep.longValue; |