[project @ 2005-01-08 21:02:32 by bursa]

Initial version of RISC OS Unicode font library. Require Unicode (RO5) Font Manager.

svn path=/import/rufl/; revision=2443

1 files changed, 43 insertions, 0 deletions

diff --git a/rufl_quit.c b/rufl_quit.c
new file mode 100644
index 0000000..e15a80b
--- /dev/null
+++ b/rufl_quit.c
@@ -0,0 +1,43 @@
+/*
+ * This file is part of RUfl
+ * Licensed under the MIT License,
+ *                http://www.opensource.org/licenses/mit-license
+ * Copyright 2005 James Bursa <james@semichrome.net>
+ */
+
+#include <stdlib.h>
+#include "oslib/font.h"
+#include "rufl_internal.h"
+
+
+/**
+ * Free all resources used by the library.
+ */
+
+void rufl_quit(void)
+{
+	unsigned int i;
+
+	if (!rufl_font_list)
+		return;
+
+	for (i = 0; i != rufl_font_list_entries; i++) {
+		free(rufl_font_list[i].identifier);
+		free(rufl_font_list[i].charset);
+	}
+	free(rufl_font_list);
+	rufl_font_list = 0;
+
+	for (i = 0; i != rufl_family_list_entries; i++)
+		free(rufl_family_list[i]);
+	free(rufl_family_list);
+	free(rufl_family_map);
+	rufl_family_list = 0;
+
+	for (i = 0; i != rufl_CACHE_SIZE; i++) {
+		if (rufl_cache[i].font != rufl_CACHE_NONE) {
+			xfont_lose_font(rufl_cache[i].f);
+			rufl_cache[i].font = rufl_CACHE_NONE;
+		}
+        }
+}