--- a/hedgewars/uRender.pas Fri Sep 11 01:05:02 2015 +0200
+++ b/hedgewars/uRender.pas Fri Sep 11 21:41:35 2015 +0200
@@ -359,31 +359,29 @@
{$ENDIF}
function glLoadExtension(extension : shortstring) : boolean;
+var logmsg: shortstring;
begin
-{$IFNDEF IPHONEOS}
- //TODO: pas2c does not handle {$IF (GLunit = gles11) OR DEFINED(PAS2C)}
- {$IFNDEF PAS2C}
- {$IF GLunit = gles11}
- // FreePascal doesnt come with OpenGL ES 1.1 Extension headers
- extension:= extension; // avoid hint
- glLoadExtension:= false;
- AddFileLog('OpenGL - "' + extension + '" skipped')
- {$ELSE}
- glLoadExtension:= glext_LoadExtension(extension);
- if glLoadExtension then
- AddFileLog('OpenGL - "' + extension + '" loaded')
- else
- AddFileLog('OpenGL - "' + extension + '" failed to load');
- {$ENDIF}
-
- {$ELSE} // pas2c part
- glLoadExtension:= false;
- {$ENDIF}
-{$ELSE}
extension:= extension; // avoid hint
glLoadExtension:= false;
- AddFileLog('OpenGL - "' + extension + '" skipped')
+ logmsg:= 'OpenGL - "' + extension + '" skipped';
+
+{$IFNDEF IPHONEOS}
+//TODO: pas2c does not handle
+{$IFNDEF PAS2C}
+// FreePascal doesnt come with OpenGL ES 1.1 Extension headers
+{$IF GLunit <> gles11}
+
+ glLoadExtension:= glext_LoadExtension(extension);
+
+ if glLoadExtension then
+ logmsg:= 'OpenGL - "' + extension + '" loaded'
+ else
+ logmsg:= 'OpenGL - "' + extension + '" failed to load';
+
{$ENDIF}
+{$ENDIF}
+{$ENDIF}
+ AddFileLog(logmsg);
end;
{$IFDEF USE_S3D_RENDERING OR USE_VIDEO_RECORDING}