summaryrefslogtreecommitdiffstats
path: root/win/tclWinFCmd.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-04-01 19:36:20 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-04-01 19:36:20 (GMT)
commit384b9de6bb83732c6055c5d1a880898399579ecf (patch)
tree895690fb22a220b462022f58e5c7e108ab735db3 /win/tclWinFCmd.c
parentfef5802d1e2be2aa2c62dbf5fb7c8a47cdc3b48c (diff)
downloadtcl-384b9de6bb83732c6055c5d1a880898399579ecf.zip
tcl-384b9de6bb83732c6055c5d1a880898399579ecf.tar.gz
tcl-384b9de6bb83732c6055c5d1a880898399579ecf.tar.bz2
Modify testbytestring such that is only produces pure byte-arrays, if not it errors out.
Modify Tcl_NewIntObj/Tcl_NewBooleanObj -> Tcl_NewWideIntObj. Less references to "long" datatype.
Diffstat (limited to 'win/tclWinFCmd.c')
-rw-r--r--win/tclWinFCmd.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/win/tclWinFCmd.c b/win/tclWinFCmd.c
index a950714..14bb252 100644
--- a/win/tclWinFCmd.c
+++ b/win/tclWinFCmd.c
@@ -1549,7 +1549,7 @@ GetWinFileAttributes(
}
}
- *attributePtrPtr = Tcl_NewBooleanObj(attr);
+ *attributePtrPtr = Tcl_NewWideIntObj(attr != 0);
return TCL_OK;
}