Revision: 76644
http://sourceforge.net/p/brlcad/code/76644
Author: starseeker
Date: 2020-08-02 19:51:14 +0000 (Sun, 02 Aug 2020)
Log Message:
-----------
Don't unpack fdp unless we're non-NULL
Modified Paths:
--------------
brlcad/trunk/src/libtclcad/tclcad_obj.c
Modified: brlcad/trunk/src/libtclcad/tclcad_obj.c
===================================================================
--- brlcad/trunk/src/libtclcad/tclcad_obj.c 2020-08-02 19:49:44 UTC (rev
76643)
+++ brlcad/trunk/src/libtclcad/tclcad_obj.c 2020-08-02 19:51:14 UTC (rev
76644)
@@ -1163,9 +1163,10 @@
int *fdp;
if (!p) return;
fdp = (int *)bu_process_fd(p, fd);
- if (fdp)
+ if (fdp) {
Tcl_DeleteFileHandler(*fdp);
- close(*fdp);
+ close(*fdp);
+ }
}
#else
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
