summaryrefslogtreecommitdiffstats
path: root/generic/tclPathObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-10-19 18:48:35 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-10-19 18:48:35 (GMT)
commit51e588cf28021f28bb204b2af46538f21afe7fb9 (patch)
tree364627b4ae36382dee748096f92f74b1977d4ae8 /generic/tclPathObj.c
parentef59242a2b952b5fede0131ca5c06acc36098a2c (diff)
parent9d3abb8846c9436ab40ac8ed9ecbaa9195f6e1f2 (diff)
downloadtcl-51e588cf28021f28bb204b2af46538f21afe7fb9.zip
tcl-51e588cf28021f28bb204b2af46538f21afe7fb9.tar.gz
tcl-51e588cf28021f28bb204b2af46538f21afe7fb9.tar.bz2
Merge 8.7
Diffstat (limited to 'generic/tclPathObj.c')
-rw-r--r--generic/tclPathObj.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclPathObj.c b/generic/tclPathObj.c
index 17db0d0..fbd7879 100644
--- a/generic/tclPathObj.c
+++ b/generic/tclPathObj.c
@@ -2492,7 +2492,7 @@ MakeTildeRelativePath(
"couldn't find HOME environment variable to"
" expand path", -1));
Tcl_SetErrorCode(interp, "TCL", "VALUE", "PATH",
- "HOMELESS", NULL);
+ "HOMELESS", (void *)NULL);
}
return TCL_ERROR;
}
@@ -2504,7 +2504,7 @@ MakeTildeRelativePath(
Tcl_SetObjResult(interp, Tcl_ObjPrintf(
"user \"%s\" doesn't exist", user));
Tcl_SetErrorCode(interp, "TCL", "VALUE", "PATH", "NOUSER",
- NULL);
+ (void *)NULL);
}
return TCL_ERROR;
}