summaryrefslogtreecommitdiffstats
path: root/unix/tclUnixFCmd.c
diff options
context:
space:
mode:
authoroehhar <harald.oehlmann@elmicron.de>2023-11-02 17:00:55 (GMT)
committeroehhar <harald.oehlmann@elmicron.de>2023-11-02 17:00:55 (GMT)
commitc4b1e16389ea10988c2465db583ebe757c7d2a8d (patch)
treefc25af316218a7ca1c7fa32df0226a6ec184e21a /unix/tclUnixFCmd.c
parent0ac2c2e65981fba54b935404d8e5d1760a181cd8 (diff)
parent329d72eab4e30c9f38615d017c29ccccb6c96e23 (diff)
downloadtcl-c4b1e16389ea10988c2465db583ebe757c7d2a8d.zip
tcl-c4b1e16389ea10988c2465db583ebe757c7d2a8d.tar.gz
tcl-c4b1e16389ea10988c2465db583ebe757c7d2a8d.tar.bz2
Merge main
Diffstat (limited to 'unix/tclUnixFCmd.c')
-rw-r--r--unix/tclUnixFCmd.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/tclUnixFCmd.c b/unix/tclUnixFCmd.c
index 3a6f13c..ec936e0 100644
--- a/unix/tclUnixFCmd.c
+++ b/unix/tclUnixFCmd.c
@@ -1533,7 +1533,7 @@ SetGroupAttribute(
" group \"%s\" does not exist",
TclGetString(fileName), string));
Tcl_SetErrorCode(interp, "TCL", "OPERATION", "SETGRP",
- "NO_GROUP", NULL);
+ "NO_GROUP", (void *)NULL);
}
return TCL_ERROR;
}
@@ -1604,7 +1604,7 @@ SetOwnerAttribute(
" user \"%s\" does not exist",
TclGetString(fileName), string));
Tcl_SetErrorCode(interp, "TCL", "OPERATION", "SETOWN",
- "NO_USER", NULL);
+ "NO_USER", (void *)NULL);
}
return TCL_ERROR;
}
@@ -1699,7 +1699,7 @@ SetPermissionsAttribute(
Tcl_SetObjResult(interp, Tcl_ObjPrintf(
"unknown permission string format \"%s\"",
modeStringPtr));
- Tcl_SetErrorCode(interp, "TCL", "VALUE", "PERMISSION", NULL);
+ Tcl_SetErrorCode(interp, "TCL", "VALUE", "PERMISSION", (void *)NULL);
}
return TCL_ERROR;
}