Fix to delete graphic page

2016-12-12 20:00:33 +09:00
parent b5d6fb429b
commit a54c0d7e7d
2 changed files with 19 additions and 0 deletions
--- a/SMILEBASIC/petitcomputer.d
+++ b/SMILEBASIC/petitcomputer.d
@@ -132,6 +132,13 @@ class GraphicPage
        }
        glBindFramebufferEXT(GL_FRAMEBUFFER, old);
    }
+    void deleteGL()
+    {
+        glDeleteFramebuffersEXT(1, &buffer);
+        glDeleteRenderbuffersEXT(1, &render);
+        glDeleteTextures(1, &glTexture);
+        buffer = render = glTexture = 0;
+    }
 }

 version(Windows)