force use compiler on Windows (#1017)

nelson-lang · Dec 1, 2023 · 5c9e9bd · 5c9e9bd
1 parent 9d19164
commit 5c9e9bd
Show file tree

Hide file tree

Showing 45 changed files with 169 additions and 10 deletions.
diff --git a/modules/mex/tests/test_engine.m b/modules/mex/tests/test_engine.m
@@ -7,7 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
-% <--C/C++ COMPILER REQUIRED-->
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 destinationdir = [tempdir(), 'test_engine/'];
 if isdir(destinationdir)
   rmdir(destinationdir, 's');

diff --git a/modules/mex/tests/test_examples.m b/modules/mex/tests/test_examples.m
@@ -7,7 +7,9 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
-% <--C/C++ COMPILER REQUIRED-->
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
 %=============================================================================
 run([modulepath('mex'), '/examples/mex_engine_demo_1.m'])
 filename = [tempdir(), 'mex_engine_demo_1/mex_engine_demo_1'];

diff --git a/modules/mex/tests/test_mexAtExit.m b/modules/mex/tests/test_mexAtExit.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mexAtExit') == 0
   test_dir = [tempdir(), 'mexAtExit'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mexCallMATLAB.m b/modules/mex/tests/test_mexCallMATLAB.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mexCallMATLAB') == 0
   test_dir = [tempdir(), 'mexCallMATLAB'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mexCallMATLABWithTrap.m b/modules/mex/tests/test_mexCallMATLABWithTrap.m
@@ -9,6 +9,10 @@
 %=============================================================================
 % <--ENGLISH IMPOSED-->
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mexCallMATLABWithTrap') == 0
   test_dir = [tempdir(), 'mexCallMATLABWithTrap'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mexEvalString.m b/modules/mex/tests/test_mexEvalString.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mexEvalString') == 0
   test_dir = [tempdir(), 'mexEvalString'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mexEvalStringWithTrap.m b/modules/mex/tests/test_mexEvalStringWithTrap.m
@@ -8,6 +8,9 @@
 % LICENCE_BLOCK_END
 %=============================================================================
 % <--ENGLISH IMPOSED-->
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
 %=============================================================================
 if exist('mexEvalStringWithTrap') == 0
   test_dir = [tempdir(), 'mexEvalStringWithTrap'];

diff --git a/modules/mex/tests/test_mexFunctionName.m b/modules/mex/tests/test_mexFunctionName.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mexFunctionName') == 0
   test_dir = [tempdir(), 'mexFunctionName'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mexGetVariable.m b/modules/mex/tests/test_mexGetVariable.m
@@ -7,7 +7,9 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
-% <--ADV-CLI MODE-->
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
 %=============================================================================
 if exist('mexGetVariable') == 0
   test_dir = [tempdir(), 'mexGetVariable'];

diff --git a/modules/mex/tests/test_mexInterleavedComplex.m b/modules/mex/tests/test_mexInterleavedComplex.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+    configuremsvc();
+  end
+%=============================================================================
 tmpPath = tempname();
 mkdir(tmpPath);
 status = copyfile('mexInterleavedComplex.c', tmpPath);

diff --git a/modules/mex/tests/test_mexLock.m b/modules/mex/tests/test_mexLock.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mexLock') == 0
   test_dir = [tempdir(), 'mexLock'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mexPrintf.m b/modules/mex/tests/test_mexPrintf.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mexPrintf') == 0
   test_dir = [tempdir(), 'mexPrintf'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mexPutVariable.m b/modules/mex/tests/test_mexPutVariable.m
@@ -7,7 +7,9 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
-% <--ADV-CLI MODE-->
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
 %=============================================================================
 if exist('mexPutVariable') == 0
   test_dir = [tempdir(), 'mexPutVariable'];

diff --git a/modules/mex/tests/test_mexUnlock.m b/modules/mex/tests/test_mexUnlock.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mexUnlock') == 0
   test_dir = [tempdir(), 'mexUnlock'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxAddField.m b/modules/mex/tests/test_mxAddField.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxAddField') == 0
   test_dir = [tempdir(), 'mxAddField'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxAssert.m b/modules/mex/tests/test_mxAssert.m
@@ -8,6 +8,9 @@
 % LICENCE_BLOCK_END
 %=============================================================================
 % <--ENGLISH IMPOSED-->
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
 %=============================================================================
 if exist('mxAssert') == 0
   test_dir = [tempdir(), 'mxAssert'];

diff --git a/modules/mex/tests/test_mxAssertS.m b/modules/mex/tests/test_mxAssertS.m
@@ -9,6 +9,10 @@
 %=============================================================================
 % <--ENGLISH IMPOSED-->
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxAssertS') == 0
   test_dir = [tempdir(), 'mxAssertS'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxCreateCharArray.m b/modules/mex/tests/test_mxCreateCharArray.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxCreateCharArray') == 0
   test_dir = [tempdir(), 'mxCreateCharArray'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxCreateCharMatrixFromStrings.m b/modules/mex/tests/test_mxCreateCharMatrixFromStrings.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxCreateCharMatrixFromStrings') == 0
   test_dir = [tempdir(), 'mxCreateCharMatrixFromStrings'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxCreateDoubleMatrix.m b/modules/mex/tests/test_mxCreateDoubleMatrix.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxCreateDoubleMatrix') == 0
   test_dir = [tempdir(), 'mxCreateDoubleMatrix'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxCreateDoubleScalar.m b/modules/mex/tests/test_mxCreateDoubleScalar.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxCreateDoubleScalar') == 0
   test_dir = [tempdir(), 'mxCreateDoubleScalar'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxCreateSparse.m b/modules/mex/tests/test_mxCreateSparse.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxCreateSparse') == 0
   test_dir = [tempdir(), 'mxCreateSparse'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxCreateString.m b/modules/mex/tests/test_mxCreateString.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxCreateString') == 0
   test_dir = [tempdir(), 'mxCreateString'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxCreateStringFromNChars.m b/modules/mex/tests/test_mxCreateStringFromNChars.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxCreateStringFromNChars') == 0
   test_dir = [tempdir(), 'mxCreateStringFromNChars'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxCreateStructArray.m b/modules/mex/tests/test_mxCreateStructArray.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxCreateStructArray') == 0
   test_dir = [tempdir(), 'mxCreateStructArray'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxDuplicateArrayInterleavedComplex.m b/modules/mex/tests/test_mxDuplicateArrayInterleavedComplex.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxDuplicateArrayInterleavedComplex') == 0
   test_dir = [tempdir(), 'mxDuplicateArray_interleaved'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxDuplicateArray_cell.m b/modules/mex/tests/test_mxDuplicateArray_cell.m
@@ -7,7 +7,9 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
-% <--ADV-CLI MODE-->
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
 %=============================================================================
 if exist('mxDuplicateArray') == 0
   test_dir = [tempdir(), 'mxDuplicateArray_cell'];

diff --git a/modules/mex/tests/test_mxDuplicateArray_double.m b/modules/mex/tests/test_mxDuplicateArray_double.m
@@ -7,7 +7,9 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
-% <--ADV-CLI MODE-->
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
 %=============================================================================
 if exist('mxDuplicateArray') == 0
   test_dir = [tempdir(), 'mxDuplicateArray_double'];

diff --git a/modules/mex/tests/test_mxDuplicateArray_graphic_handle.m b/modules/mex/tests/test_mxDuplicateArray_graphic_handle.m
@@ -9,6 +9,10 @@
 %=============================================================================
 % <--ADV-CLI MODE-->
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxDuplicateArray') == 0
   test_dir = [tempdir(), 'mxDuplicateArray_gh'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxDuplicateArray_integer.m b/modules/mex/tests/test_mxDuplicateArray_integer.m
@@ -7,7 +7,9 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
-% <--ADV-CLI MODE-->
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
 %=============================================================================
 if exist('mxDuplicateArray') == 0
   test_dir = [tempdir(), 'mxDuplicateArray_integer'];

diff --git a/modules/mex/tests/test_mxDuplicateArray_qml_object.m b/modules/mex/tests/test_mxDuplicateArray_qml_object.m
@@ -9,6 +9,10 @@
 %=============================================================================
 % <--ADV-CLI MODE-->
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxDuplicateArray') == 0
   test_dir = [tempdir(), 'mxDuplicateArray_qml'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxDuplicateArray_sparse.m b/modules/mex/tests/test_mxDuplicateArray_sparse.m
@@ -7,7 +7,9 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
-% <--ADV-CLI MODE-->
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
 %=============================================================================
 if exist('mxDuplicateArray') == 0
   test_dir = [tempdir(), 'mxDuplicateArray_sparse'];

diff --git a/modules/mex/tests/test_mxDuplicateArray_struct.m b/modules/mex/tests/test_mxDuplicateArray_struct.m
@@ -7,7 +7,9 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
-% <--ADV-CLI MODE-->
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
 %=============================================================================
 if exist('mxDuplicateArray') == 0
   test_dir = [tempdir(), 'mxDuplicateArray_struct'];

diff --git a/modules/mex/tests/test_mxGetClassName.m b/modules/mex/tests/test_mxGetClassName.m
@@ -9,6 +9,10 @@
 %=============================================================================
 % <--ADV-CLI MODE-->
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxGetClassName') == 0
   test_dir = [tempdir(), 'mxGetClassName'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxGetFieldByNumber.m b/modules/mex/tests/test_mxGetFieldByNumber.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxGetFieldByNumber') == 0
   test_dir = [tempdir(), 'mxGetFieldByNumber'];
   if isdir(test_dir)

diff --git a/modules/mex/tests/test_mxGetFieldNameByNumber.m b/modules/mex/tests/test_mxGetFieldNameByNumber.m
@@ -7,6 +7,10 @@
 % SPDX-License-Identifier: LGPL-3.0-or-later
 % LICENCE_BLOCK_END
 %=============================================================================
+if ispc() && ~havecompiler()
+  configuremsvc();
+end
+%=============================================================================
 if exist('mxGetFieldNameByNumber') == 0
   test_dir = [tempdir(), 'mxGetFieldNameByNumber'];
   if isdir(test_dir)