gamnit: don't delete uninitialized programs

Signed-off-by: Alexis Laferrière <alexis.laf@xymus.net>

diff --git a/lib/gamnit/programs.nit b/lib/gamnit/programs.nit
index 9df20cd..6efc68b 100644 (file)
--- a/lib/gamnit/programs.nit
+++ b/lib/gamnit/programs.nit
@@ -484,7 +484,9 @@ abstract class GamnitProgram
        do
                if deleted then return
 
-               glDeleteProgram gl_program.as(not null)
+               var gl_program = gl_program
+               if gl_program != null then glDeleteProgram gl_program
+
                deleted = true
        end
 end