From c0f1e1b81f3bc804b3ff9da22581d7e621670e9a Mon Sep 17 00:00:00 2001
From: jsancho <devnull@localhost>
Date: Sat, 10 Oct 2009 11:29:05 +0000
Subject: [PATCH]

---
 gacela_FTGL.lisp | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/gacela_FTGL.lisp b/gacela_FTGL.lisp
index 7e0b332..d1b0d19 100644
--- a/gacela_FTGL.lisp
+++ b/gacela_FTGL.lisp
@@ -35,7 +35,11 @@
 (defcfun "void gacela_ftglRenderFont (int font, char *string, int mode)" 0
   "ftglRenderFont (font, string, mode);")
 
+(defcfun "void gacela_ftglDestroyFont (int font)" 0
+  "ftglDestroyFont (font);")
+
 (defentry ftglCreateTextureFont (string) (int "gacela_ftglCreateTextureFont"))
 (defentry ftglSetFontFaceSize (int int int) (int "gacela_ftglSetFontFaceSize"))
 (defentry ftglSetFontCharMap (int int) (int "gacela_ftglSetFontCharMap"))
 (defentry ftglRenderFont (int string int) (void "gacela_ftglRenderFont"))
+(defentry ftglDestroyFont (int) (void "gacela_ftglDestroyFont"))
-- 
2.39.2