hedgewars/uStore.pas
changeset 4850 434cd1284204
parent 4812 f924be23ffb4
child 4874 f508adb769b8
--- a/hedgewars/uStore.pas	Mon Jan 17 23:24:55 2011 +0100
+++ b/hedgewars/uStore.pas	Tue Jan 18 00:12:39 2011 +0100
@@ -17,6 +17,7 @@
  *)
 
 {$INCLUDE "options.inc"}
+{$IF GLunit = GL}{$DEFINE GLunit:=GL,GLext}{$ENDIF}
 
 unit uStore;
 interface
@@ -436,7 +437,8 @@
 
 function glLoadExtension(extension : shortstring) : boolean;
 begin
-{$IFDEF IPHONEOS}
+{$IF GLunit = gles11}
+    // FreePascal doesn't come with OpenGL ES 1.1 Extension headers
     extension:= extension; // avoid hint
     glLoadExtension:= false;
 {$IFDEF DEBUGFILE}