1 files changed, 25 insertions, 0 deletions
diff --git a/src/libs6/ftrig1_free.c b/src/libs6/ftrig1_free.c
new file mode 100644
index 0000000..091dc87
--- /dev/null
+++ b/src/libs6/ftrig1_free.c
@@ -0,0 +1,25 @@
+/* ISC license. */
+
+#include <unistd.h>
+#include <skalibs/stralloc.h>
+#include <skalibs/djbunix.h>
+#include "ftrig1.h"
+
+void ftrig1_free (ftrig1_t *p)
+{
+  if (p->name.s)
+  {
+    unlink(p->name.s) ;
+    stralloc_free(&p->name) ;
+  }
+  if (p->fd >= 0)
+  {
+    fd_close(p->fd) ;
+    p->fd = -1 ;
+  }
+  if (p->fdw >= 0)
+  {
+    fd_close(p->fdw) ;
+    p->fdw = -1 ;
+  }
+}