(free_environment): free result of read_environment().

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@20866 ec53bebd-3082-4978-b11e-865c3cabbd6b

lib/roken/environment.c

@@ -143,3 +143,14 @@ read_environment(const char *file, char ***env)
     fclose(F);
     return assigned;
 }
+
+void ROKEN_LIB_FUNCTION
+free_environment(char **env)
+{
+    int i;
+    if (env == NULL)
+	return;
+    for (i = 0; env[i]; i++)
+	free(env[i]);
+    free(env);
+}