* don't call softfp compilerprocs in the implementation of others, but let

    them be called implicitly by the compiler (these symbols are no longer
    accessible from Pascal code since r31404)

git-svn-id: trunk@31477 -

rtl/wince/system.pp

@@ -105,8 +105,6 @@ function CreateFileW(lpFileName:pwidechar; dwDesiredAccess:DWORD; dwShareMode:DW
 
 
 {$ifdef CPUARM}
-{ the external directive isn't really necessary here because it is overridden by external (FK) }
-
 function addd(d1,d2 : double) : double; compilerproc;
    cdecl;external 'coredll' name '__addd';
 
@@ -282,22 +280,22 @@ end;
 
 function adds(s1,s2 : single) : single;
 begin
-  adds := addd(s1, s2);
+  adds := double(s1) + double(s2);
 end;
 
 function subs(s1,s2 : single) : single;
 begin
-  subs := subd(s1, s2);
+  subs := double(s1) - double(s2);
 end;
 
 function muls(s1,s2 : single) : single;
 begin
-  muls := muld(s1, s2);
+  muls := double(s1) * double(s2);
 end;
 
 function divs(s1,s2 : single) : single;
 begin
-  divs := divd(s1, s2);
+  divs := double(s1) / double(s2);
 end;
 
 {$endif CPUARM}