X-Git-Url: https://git.distorted.org.uk/~mdw/fwd/blobdiff_plain/e82f7154f65062d9ac8b9677862774498b331058..667fb920a9ace885b3ac2dc8277d104930bd2727:/acl.c

diff --git a/acl.c b/acl.c
index 4dadc24..a7e448e 100644
--- a/acl.c
+++ b/acl.c
@@ -1,10 +1,10 @@
 /* -*-c-*-
  *
- * $Id: acl.c,v 1.1 1999/07/01 08:56:23 mdw Exp $
+ * $Id: acl.c,v 1.2 1999/07/26 23:28:15 mdw Exp $
  *
  * Access control list handling
  *
- * (c) 1999 Mark Wooding
+ * (c) 1999 Straylight/Edgeware
  */
 
 /*----- Licensing notice --------------------------------------------------* 
@@ -29,8 +29,11 @@
 /*----- Revision history --------------------------------------------------* 
  *
  * $Log: acl.c,v $
- * Revision 1.1  1999/07/01 08:56:23  mdw
- * Initial revision
+ * Revision 1.2  1999/07/26 23:28:15  mdw
+ * Minor modifications for new design.
+ *
+ * Revision 1.1.1.1  1999/07/01 08:56:23  mdw
+ * Initial revision.
  *
  */
 
@@ -110,6 +113,24 @@ void acl_dump(acl_entry *a, FILE *fp)
   }
 }
 
+/* --- @acl_free@ --- *
+ *
+ * Arguments:	@acl_entry *a@ = pointer to a list of ACLs
+ *
+ * Returns:	---
+ *
+ * Use:		Frees all of the memory used by an ACL.
+ */
+
+void acl_free(acl_entry *a)
+{
+  while (a) {
+    acl_entry *aa = a;
+    a = a->next;
+    DESTROY(aa);
+  }
+}
+
 /* --- @acl_add@ --- *
  *
  * Arguments:	@acl_entry ***a@ = address of pointer to list tail