Browse Source

+ fixed this to compile at least on bigendian

git-svn-id: trunk@5709 -
Károly Balogh 18 years ago
parent
commit
f4a21e599a
1 changed files with 1 additions and 1 deletions
  1. 1 1
      rtl/inc/softfpu.pp

+ 1 - 1
rtl/inc/softfpu.pp

@@ -149,7 +149,7 @@ TYPE
     low : qword;
     low : qword;
   end;
   end;
 
 
-  float128 = packed word
+  float128 = packed record
     high : qword;
     high : qword;
     low : qword;
     low : qword;
   end;
   end;