paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 14:49:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

Move int32p.inc inclusion to end of i8086.inc as it needs to be parsed before generic.inc

Browse Source 
git-svn-id: trunk@26366 -
This commit is contained in:
pierre 2014-01-03 11:42:53 +00:00
parent b106ded0e9
commit a4e08f8611
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/i8086/i8086.inc
View File

@ -301,3 +301,5 @@ Procedure SysResetFPU;
softfloat_exception_flags:=0; softfloat_exception_flags:=0;
end; end;
{$I int32p.inc}

2
rtl/i8086/int64p.inc
View File

@ -13,8 +13,6 @@
**********************************************************************} **********************************************************************}
{$I int32p.inc}
{$define FPC_SYSTEM_HAS_MUL_QWORD} {$define FPC_SYSTEM_HAS_MUL_QWORD}
function fpc_mul_qword( f1, f2: qword; checkoverflow: longbool ): qword; [public,alias: 'FPC_MUL_QWORD']; compilerproc; function fpc_mul_qword( f1, f2: qword; checkoverflow: longbool ): qword; [public,alias: 'FPC_MUL_QWORD']; compilerproc;
begin begin