diff --git a/0-floor/lace_shared/lace_shared.gpr b/0-floor/lace_shared/lace_shared.gpr
index 5a1af93..384c97b 100644
--- a/0-floor/lace_shared/lace_shared.gpr
+++ b/0-floor/lace_shared/lace_shared.gpr
@@ -35,7 +35,7 @@ is
 
    Fast_Options := ("-O3", 
                     "-gnatn",
-                    "-gnatp",
+                    -- "-gnatp",       -- TODO: This breaks opengl code. Investigate more.
                     "-funroll-loops",
                     "-ftracer");