changeset 2587 | 0dfa56a8513c |
parent 2300 | d633bc70c893 |
child 2599 | c7153d2348f3 |
--- a/hedgewars/uFloat.pas Sun Oct 25 15:55:49 2009 +0000 +++ b/hedgewars/uFloat.pas Sun Oct 25 16:35:09 2009 +0000 @@ -29,14 +29,14 @@ 0: (Frac, Round: Longword); 1: (QWordValue : QWord); end; -{$else FPC_LITTLE_ENDIAN} +{$else} type hwFloat = record isNegative: boolean; case byte of 0: (Round, Frac: Longword); 1: (QWordValue : QWord); end; -{$endif FPC_LITTLE_ENDIAN} +{$endif} function int2hwFloat (const i: LongInt) : hwFloat;