summaryrefslogtreecommitdiffstats
path: root/win/tclWinChan.c
diff options
context:
space:
mode:
authorandreask <andreask>2014-11-06 18:38:36 (GMT)
committerandreask <andreask>2014-11-06 18:38:36 (GMT)
commit6e42c4bf10f4e275c5ae106296110a3584b4a070 (patch)
treec8ac936da5fd2bc1d67b309ab88bd64ee0ef1609 /win/tclWinChan.c
parente35f1f6d7d8f8e1bc59318735e23b34ab06d8f54 (diff)
parentf033a745db5e733d99ebc0a7895320435de1bd82 (diff)
downloadtcl-6e42c4bf10f4e275c5ae106296110a3584b4a070.zip
tcl-6e42c4bf10f4e275c5ae106296110a3584b4a070.tar.gz
tcl-6e42c4bf10f4e275c5ae106296110a3584b4a070.tar.bz2
Merged latest trunk work (especially changes to eof handling) into the RC.
Diffstat (limited to 'win/tclWinChan.c')
-rw-r--r--win/tclWinChan.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/win/tclWinChan.c b/win/tclWinChan.c
index 48acacb..2d6c42c 100644
--- a/win/tclWinChan.c
+++ b/win/tclWinChan.c
@@ -843,6 +843,11 @@ TclpOpenFileChannel(
nativeName = Tcl_FSGetNativePath(pathPtr);
if (nativeName == NULL) {
+ if (interp != (Tcl_Interp *) NULL) {
+ Tcl_AppendResult(interp, "couldn't open \"",
+ TclGetString(pathPtr), "\": filename is invalid on this platform",
+ NULL);
+ }
return NULL;
}