fix-FTBFS-on-m68k
authorPascal Packaging Team <pkg-pascal-devel@lists.alioth.debian.org>
Tue, 12 Jan 2021 11:45:42 +0000 (11:45 +0000)
committerGraham Inggs <ginggs@debian.org>
Tue, 12 Jan 2021 11:45:42 +0000 (11:45 +0000)
===================================================================

Gbp-Pq: Name fix-FTBFS-on-m68k.patch

fpcsrc/rtl/m68k/int64p.inc

index 26d4949d9a7f849a3aecc76e790f5c18cbadafd0..f9f373b71a9e28d01f34e6f1f06615b512ad68be 100644 (file)
@@ -14,6 +14,7 @@
  **********************************************************************}
 
 
+{$ifndef VER3_0}
 {$ifndef FPC_SYSTEM_HAS_MUL_LONGINT_TO_INT64}
 {$define FPC_SYSTEM_HAS_MUL_LONGINT_TO_INT64}
 function fpc_mul_longint_to_int64(f1,f2 : longint) : int64;[public,alias: 'FPC_MUL_LONGINT_TO_INT64']; assembler; nostackframe; compilerproc;
@@ -124,3 +125,4 @@ asm
     clr.l    d1
 end;
 {$endif FPC_SYSTEM_HAS_MUL_LONGINT_TO_INT64}
+{$endif VER3_0}