Ver Fonte

Avoid invalid typecast in tarmunaryminusnode.pass_1 method

git-svn-id: trunk@44726 -
pierre há 5 anos atrás
pai
commit
73b563b367
1 ficheiros alterados com 1 adições e 1 exclusões
  1. 1 1
      compiler/arm/narmmat.pas

+ 1 - 1
compiler/arm/narmmat.pas

@@ -368,7 +368,7 @@ implementation
           end;
 
         if (FPUARM_HAS_VFP_DOUBLE in fpu_capabilities[current_settings.fputype]) or
-          (tfloatdef(resultdef).floattype=s32real) then
+          is_single(resultdef) then
           exit(inherited pass_1);
 
         result:=nil;