hedgewars/uConsts.pas
changeset 2715 0e4e0db79e2a
parent 2713 71250942e95b
child 2716 b9ca1bfca24f
--- a/hedgewars/uConsts.pas	Sun Jan 24 19:52:30 2010 +0000
+++ b/hedgewars/uConsts.pas	Tue Jan 26 04:13:37 2010 +0000
@@ -152,13 +152,14 @@
 		X, Y: GLint;
 		end;
 
+	PTexture = ^TTexture;
 	TTexture = record
 			id: GLuint;
 			w, h: LongInt;
 			rx, ry: GLfloat;
 			vb, tb: array [0..3] of TVertex2f;
+            PrevTexture, NextTexture: PTexture;
 			end;
-	PTexture = ^TTexture;
 
 const
 	// message constants