Explorar el Código

* use $E switch to determine tests

carl hace 23 años
padre
commit
061b179457
Se han modificado 1 ficheros con 3 adiciones y 3 borrados
  1. 3 3
      tests/test/cg/tstr.pp

+ 3 - 3
tests/test/cg/tstr.pp

@@ -64,7 +64,7 @@ begin
 
   { for more in-depth tests of str_real, see ../tstreal[1,2].pp }
   f := -1.12345;
-{$ifndef FPU_EMULATION}  
+{$IFOPT E-}  
   str(f,s);
   check('-1.123450000000000E+000');
 {$endif}  
@@ -242,7 +242,7 @@ begin
 
   { for more in-depth tests of str_real, see ../tstreal[1,2].pp }
   f := -1.12345;
-{$ifndef FPU_EMULATION}  
+{$IFOPT E-}  
   str(f,s);
   check('-1.123450000000000E+000');
 {$endif}  
@@ -421,7 +421,7 @@ begin
 
   { for more in-depth tests of str_real, see ../tstreal[1,2].pp }
   f := -1.12345;
-{$ifndef FPU_EMULATION}  
+{$IFOPT E-}  
   str(f,s);
   check('-1.123450000000000E+000');
 {$endif}