From fef1ea273314e6dbd35f6b4732da18c7df42cb8b Mon Sep 17 00:00:00 2001
From: malc <av1474@comtv.ru>
Date: Sun, 2 Dec 2012 23:06:07 +0400
Subject: [PATCH] Don't leak memory don't do unnecessary things

---
 link.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/link.c b/link.c
index c2ac33b..fb25bed 100644
--- a/link.c
+++ b/link.c
@@ -589,6 +589,9 @@ static void freetile (struct tile *tile)
         state.pig = tile->pixmap;
 #endif
     }
+    else {
+        free (tile->pbo);
+    }
     free (tile);
 }
 
@@ -3435,8 +3438,6 @@ CAMLprim value ml_freepbo (value s_v)
     struct tile *tile = parse_pointer ("ml_freepbo", s);
 
     if (tile->pbo) {
-        state.glBindBufferARB (GL_PIXEL_UNPACK_BUFFER_ARB, tile->pbo->id);
-        state.glUnmapBufferARB (GL_PIXEL_UNPACK_BUFFER_ARB);
         state.glDeleteBuffersARB (1, &tile->pbo->id);
         tile->pbo->id = -1;
         tile->pbo->ptr = NULL;
-- 
2.11.4.GIT