add has_parallel_toolbox()

Author: scivision

+stdlib/has_parallel_toolbox.m

@@ -0,0 +1,18 @@
+%% HAS_PARALLEL_TOOLBOX does the user have Parallel Computing Toolbox and the license available for it?
+% This deliberately doesn't catch the case where the toolbox and license is valid, but there aren't
+% enough licenses, so that the user knows what's happening.
+% The user can use stdlib.checkout_license() to affirm that the license is available at the time of the call.
+
+function y = has_parallel_toolbox()
+
+try
+  gcp('nocreate');
+  y = true;
+catch e
+  if e.identifier ~= "MATLAB:UndefinedFunction"
+    rethrow(e)
+  end
+  y = false;
+end
+
+end

test/TestPlatform.m

@@ -7,7 +7,16 @@
 end
 
 
-methods (Test)
+methods (Test, TestTags = {'toolbox', 'java'})
+function test_all_toolboxes(tc)
+tc.assumeTrue(stdlib.has_java())
+tbx = stdlib.allToolboxes();
+tc.verifyClass(tbx, "table")
+end
+end
+
+
+methods (Test, TestTags={'toolbox'})
 
 function test_toolbox_used(tc)
 r = fullfile(fileparts(fileparts(mfilename('fullpath'))), '+stdlib');
@@ -23,12 +32,18 @@ function test_toolbox_used(tc)
 tc.verifyEqual(length(mathworksUsed), 1)
 end
 
-function test_all_toolboxes(tc)
-tc.assumeTrue(stdlib.has_java())
-tbx = stdlib.allToolboxes();
-tc.verifyClass(tbx, "table")
+
+function test_has_parallel_toolbox(tc)
+y = stdlib.has_parallel_toolbox();
+tc.verifyClass(y, 'logical')
+tc.verifyNotEmpty(y)
+end
+
 end
 
+
+methods (Test)
+
 function test_platform_tell(tc)
 r = stdlib.platform_tell();
 tc.verifyClass(r, 'char')
@@ -112,4 +127,4 @@ function test_cpu_count(tc)
 
 end
 
-end
+end