Преглед изворни кода

* compilation on 32 bit sparc fixed

git-svn-id: trunk@36660 -
florian пре 8 година
родитељ
комит
1f4d6e8a4d
1 измењених фајлова са 2 додато и 0 уклоњено
  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)