hedgewars/uMatrix.pas
changeset 10133 d73412fbf3b4
parent 10108 c68cf030eded
child 10306 4fca8bcfaff0
--- a/hedgewars/uMatrix.pas	Wed Feb 12 22:40:35 2014 +0400
+++ b/hedgewars/uMatrix.pas	Wed Feb 12 23:40:35 2014 +0400
@@ -228,7 +228,6 @@
     Result[3,3]:=lhs[0,3]*rhs[3,0] + lhs[1,3]*rhs[3,1] + lhs[2,3]*rhs[3,2] + lhs[3,3]*rhs[3,3];
 }
 
-    {$IFNDEF PAS2C}
     glPushMatrix;
     glLoadMatrixf(@lhs[0, 0]);
     glMultMatrixf(@rhs[0, 0]);
@@ -241,6 +240,7 @@
         if Abs(test[i, j] - Result[i, j]) > 0.000001 then
           error:=true;
 
+    {$IFNDEF PAS2C}
     if error then
     begin
         writeln('shall:');