hedgewars/uRender.pas
changeset 7069 bcf9d8e64e92
parent 7028 0f60591f3a16
child 7080 dbf43c07a507
child 8026 4a4f21070479
child 8145 6408c0ba4ba1
--- a/hedgewars/uRender.pas	Sat May 12 22:50:33 2012 +0400
+++ b/hedgewars/uRender.pas	Sat May 12 23:55:09 2012 +0400
@@ -408,10 +408,10 @@
 
 procedure DrawHedgehog(X, Y: LongInt; Dir: LongInt; Pos, Step: LongWord; Angle: real);
 const VertexBuffer: array [0..3] of TVertex2f = (
-        (x: -16; y: -16),
-        (x:  16; y: -16),
-        (x:  16; y:  16),
-        (x: -16; y:  16));
+        (X: -16; Y: -16),
+        (X:  16; Y: -16),
+        (X:  16; Y:  16),
+        (X: -16; Y:  16));
 var l, r, t, b: real;
     TextureBuffer: array [0..3] of TVertex2f;
 begin