SEP 39 DONE

[scilab.git] / scilab / modules / dynamic_link / tests / unit_tests / ilib_build_f90.tst

diff --git a/scilab/modules/dynamic_link/tests/unit_tests/ilib_build_f90.tst b/scilab/modules/dynamic_link/tests/unit_tests/ilib_build_f90.tst
index 2309b41..8e10ab4 100644 (file)
--- a/scilab/modules/dynamic_link/tests/unit_tests/ilib_build_f90.tst
+++ b/scilab/modules/dynamic_link/tests/unit_tests/ilib_build_f90.tst
@@ -17,7 +17,7 @@
 // Checks on windows that we have a Fortran 90 compiler (Intel)
 
 if haveacompiler() then
-  if ( (getos() == 'Windows' & findmsifortcompiler() <> 'unknown') | (~MSDOS) ) then
+  if ( (getos() == 'Windows' & findmsifortcompiler() <> 'unknown') | (getos() <> 'Windows') ) then
     ilib_verbose(0);
     sourcecode=['subroutine incrdoublef90(x,y)'
                 '  implicit none'