git-svn-id: trunk@29117 -
@@ -41,7 +41,11 @@ begin
if (itemasbyte <> $de) then
halt(1);
+{$ifdef FPC_BIG_ENDIAN}
if (itemasword <> $dead) then
+{$else}
+ if (itemasword <> $adde) then
+{$endif}
halt(3);
r.a := $de;