From: John Kohl <jtkohl@mit.edu>
Date: Wed, 7 Mar 1990 16:39:41 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: krb5-1.0-alpha2~1017
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=6facbbede70f7e7a08b038a44ea9f4d8a1993143;p=krb5.git

*** empty log message ***

git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@367 dc483132-0cff-0310-8789-dd5450dbe970
---

diff --git a/src/lib/krb5/os/free_krbhs.c b/src/lib/krb5/os/free_krbhs.c
new file mode 100644
index 000000000..503f55808
--- /dev/null
+++ b/src/lib/krb5/os/free_krbhs.c
@@ -0,0 +1,38 @@
+/*
+ * $Source$
+ * $Author$
+ *
+ * Copyright 1990 by the Massachusetts Institute of Technology.
+ *
+ * For copying and distribution information, please see the file
+ * <krb5/mit-copyright.h>.
+ *
+ * krb5_free_krbhst() function
+ */
+
+#if !defined(lint) && !defined(SABER)
+static char free_krbhs_c[] =
+"$Id$";
+#endif	/* !lint & !SABER */
+
+#include <krb5/copyright.h>
+
+#include <krb5/krb5.h>
+
+#include <krb5/ext-proto.h>
+
+/*
+ Frees the storage taken by a host list returned by krb5_get_krbhst.
+ */
+
+krb5_error_code
+krb5_free_krbhst(hostlist)
+char **hostlist;
+{
+    register char **cp;
+
+    for (cp = hostlist; *cp; cp++)
+	free(*cp);
+    free((char *)hostlist);
+    return 0;
+}