summaryrefslogtreecommitdiffstats
path: root/generic/tclIO.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2021-03-15 09:52:02 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2021-03-15 09:52:02 (GMT)
commit57bf9fe12f8859459556da1de27dbdef24048a68 (patch)
treebe090b2371f173d19abc0f9ecbf81a42786069c0 /generic/tclIO.c
parent1f2858fefd73a6dfd349b59ff63427810467b2ac (diff)
downloadtcl-57bf9fe12f8859459556da1de27dbdef24048a68.zip
tcl-57bf9fe12f8859459556da1de27dbdef24048a68.tar.gz
tcl-57bf9fe12f8859459556da1de27dbdef24048a68.tar.bz2
More refactoring to reduce the choked-up complexity of tclZipfs.c
Diffstat (limited to 'generic/tclIO.c')
-rw-r--r--generic/tclIO.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c
index 9cace8c..3954af2 100644
--- a/generic/tclIO.c
+++ b/generic/tclIO.c
@@ -3387,7 +3387,8 @@ int
Tcl_Close(
Tcl_Interp *interp, /* Interpreter for errors. */
Tcl_Channel chan) /* The channel being closed. Must not be
- * referenced in any interpreter. */
+ * referenced in any interpreter. May be NULL,
+ * in which case this is a no-op. */
{
CloseCallback *cbPtr; /* Iterate over close callbacks for this
* channel. */