Răsfoiți Sursa

* compilation on 32 bit sparc fixed

git-svn-id: trunk@36660 -
florian 8 ani în urmă
părinte
comite
1f4d6e8a4d
1 a modificat fișierele cu 2 adăugiri și 0 ștergeri
  1. 2 0
      compiler/sparcgen/ncpumat.pas

+ 2 - 0
compiler/sparcgen/ncpumat.pas

@@ -31,7 +31,9 @@ interface
     type
       tSparcmoddivnode = class(tmoddivnode)
         procedure pass_generate_code;override;
+{$ifdef SPARC64}
         function use_moddiv64bitint_helper : boolean; override;
+{$endif SPARC64}
       end;
 
       tSparcshlshrnode = class(tcgshlshrnode)