Sound: OpenAL: Free the sound buffer after load

diff --git a/src/engine/e_sound_al.inc b/src/engine/e_sound_al.inc
index 38b9bb6109757f788eaf9864e4283b2d07a39385..aa843dfba137b59c736efbd1a9537c69571e95c8 100644 (file)
--- a/src/engine/e_sound_al.inc
+++ b/src/engine/e_sound_al.inc
@@ -337,6 +337,8 @@ begin
     e_SoundsArray[find_id].Loader := Loader;
   end;
 
+  // the calling side won't free this, the loader will get a copy, so fuck it
+  FreeMem(pData);
   ID := find_id;
   Result := True;
 end;
@@ -412,6 +414,8 @@ begin
     e_SoundsArray[find_id].Loader := Loader;
   end;
 
+  // the calling side won't free this, the loader will get a copy, so fuck it
+  FreeMem(pData);
   ID := find_id;
   Result := True;
 end;