hedgewars/SDLh.pas
changeset 10015 4feced261c68
parent 9998 736015b847e3
parent 9952 32f5982604f4
child 10108 c68cf030eded
--- a/hedgewars/SDLh.pas	Sun Jan 19 00:18:28 2014 +0400
+++ b/hedgewars/SDLh.pas	Tue Jan 21 22:38:13 2014 +0100
@@ -404,15 +404,26 @@
         w, h  : LongInt;
         pitch : {$IFDEF SDL2}LongInt{$ELSE}Word{$ENDIF};
         pixels: Pointer;
-{$IFDEF SDL2}
-        userdata: Pointer;
-        locked: LongInt;
-        lock_data: Pointer;
+{$IFDEF PAS2C}
+        hwdata   : Pointer;
         clip_rect: TSDL_Rect;
-        map: Pointer;
-        refcount: LongInt;
+        unsed1   : LongWord;
+        locked   : LongWord;
+        map      : Pointer;
+        format_version: Longword;
+        refcount : LongInt;
+        offset   : LongInt;
 {$ELSE}
-        offset: LongInt;
+{$IFDEF SDL2}
+        userdata  : Pointer;
+        locked    : LongInt;
+        lock_data : Pointer;
+        clip_rect : TSDL_Rect;
+        map       : Pointer;
+        refcount  : LongInt;
+{$ELSE}
+        offset : LongInt;
+{$ENDIF}
 {$ENDIF}
         end;
 
@@ -825,6 +836,7 @@
 
     TByteArray = array[0..65535] of Byte;
     PByteArray = ^TByteArray;
+
     TLongWordArray = array[0..16383] of LongWord;
     PLongWordArray = ^TLongWordArray;