perl: Log and Die funtions are now exportable

[libucw.git] / lib / bitsig.c

diff --git a/lib/bitsig.c b/lib/bitsig.c
index 2e8d5c1f486f4c05a39cefd9602dce5c76131cbe..9b072e1fc3dcc5c038bfd00645779b5cd4fd101e 100644 (file)
--- a/lib/bitsig.c
+++ b/lib/bitsig.c
@@ -1,5 +1,5 @@
 /*
- *     Bit Array Signatures -- A Dubious Detector of Duplicates
+ *     UCW Library -- Bit Array Signatures -- A Dubious Detector of Duplicates
  *
  *     (c) 2002 Martin Mares <mj@ucw.cz>
  *
@@ -36,6 +36,9 @@
  *     We leave L and an upper bound for N as parameters set during
  *     creation of the structure. Currently, the structure is limited
  *     to 4 Gb = 512 MB.
+ *
+ *     This software may be freely distributed and used according to the terms
+ *     of the GNU Lesser General Public License.
  */
 
 #include "lib/lib.h"
@@ -73,6 +76,12 @@ bitsig_init(uns perrlog, uns maxn)
   return b;
 }
 
+void
+bitsig_free(struct bitsig *b)
+{
+  xfree(b);
+}
+
 static void
 bitsig_hash_init(struct bitsig *b, byte *item)
 {