Merge pull request #27 from LocutusOfBorg/fix-build2
Fix arm* build failures
< LocutusOfBorg1> sheepluva, the problem is fpc, so the workaround might be necessary even if they patch it :(
http://bugs.freepascal.org/view.php?id=27222
--- a/hedgewars/uRender.pas Mon Jan 05 14:05:09 2015 +0100
+++ b/hedgewars/uRender.pas Mon Jan 05 14:37:08 2015 +0100
@@ -535,11 +535,14 @@
end;
procedure openglRotatef(RotX, RotY, RotZ: GLfloat; dir: LongInt); inline;
+{ workaround for pascal bug http://bugs.freepascal.org/view.php?id=27222 }
+var tmpdir: LongInt;
begin
+tmpdir:=dir;
{$IFDEF GL2}
- hglRotatef(RotX, RotY, RotZ, dir);
+ hglRotatef(RotX, RotY, RotZ, tmpdir);
{$ELSE}
- glRotatef(RotX, RotY, RotZ, dir);
+ glRotatef(RotX, RotY, RotZ, tmpdir);
{$ENDIF}
end;