Add a function to dispose the fonts

src/blupi.cxx

@@ -1116,6 +1116,7 @@ main (int argc, char * argv[])
 
   Platform::run (HandleEvent);
 
+  DisposeFonts ();
   FinishObjects ();
 
   if (g_renderer)

src/text.cxx

@@ -68,9 +68,21 @@ struct TexText {
 
   ~TexText ()
   {
-    SDL_DestroyTexture (this->outline);
-    SDL_DestroyTexture (this->base);
-    SDL_DestroyTexture (this->over);
+    if (this->outline)
+    {
+      SDL_DestroyTexture (this->outline);
+      this->outline = nullptr;
+    }
+    if (this->base)
+    {
+      SDL_DestroyTexture (this->base);
+      this->base = nullptr;
+    }
+    if (this->over)
+    {
+      SDL_DestroyTexture (this->over);
+      this->over = nullptr;
+    }
   }
 };
 
@@ -133,7 +145,7 @@ public:
       TTF_SetFontDirection (this->font, TTF_DIRECTION_RTL);
   }
 
-  ~Font () { TTF_CloseFont (this->font); }
+  ~Font () {  this->cache.Clear (); TTF_CloseFont (this->font); }
 
   TTF_Font * GetFont () { return this->font; }
 
@@ -379,6 +391,10 @@ public:
   }
 
   ~Fonts ()
+  {
+  }
+
+  void Clear ()
   {
     delete this->latinLittle;
     delete this->latinRed;
@@ -654,6 +670,12 @@ GetFonts ()
   return &fonts;
 }
 
+void
+DisposeFonts ()
+{
+  GetFonts ()->Clear ();
+}
+
 /**
  * \brief Draw a text in a pixmap to a specific position.
  *

src/text.h

@@ -30,6 +30,7 @@
 class Fonts;
 
 Fonts * GetFonts ();
+void DisposeFonts ();
 
 void DrawText (
   CPixmap * pPixmap, Point pos, const char * pText, Sint32 font = 0,