Update binsparse_read and binsparse_write roundtrip test with optional

tmp dir.

Author: BenBrock

bindings/matlab/test_binsparse_roundtrip_dir.m

@@ -2,15 +2,15 @@
 %
 % SPDX-License-Identifier: BSD-3-Clause
 
-function test_binsparse_roundtrip_dir(root_dir)
+function test_binsparse_roundtrip_dir(root_dir, temp_dir)
 % TEST_BINSPARSE_ROUNDTRIP_DIR - Round-trip binsparse files in a directory.
 %
 % This function scans a directory (recursively) for .h5 files, reads each
 % with binsparse_read, writes to a temporary file with binsparse_write, then
 % reads back and checks for equivalence.
 
 if nargin < 1 || isempty(root_dir)
-    error('Usage: test_binsparse_roundtrip_dir(root_dir)');
+    error('Usage: test_binsparse_roundtrip_dir(root_dir, [temp_dir])');
 end
 
 if ~isfolder(root_dir)
@@ -25,6 +25,14 @@ function test_binsparse_roundtrip_dir(root_dir)
     error('binsparse_write MEX function not found. Build it first.');
 end
 
+if nargin < 2 || isempty(temp_dir)
+    temp_dir = '';
+end
+
+if ~isempty(temp_dir) && ~isfolder(temp_dir)
+    error('Temp directory not found: %s', temp_dir);
+end
+
 files = list_h5_files(root_dir);
 if isempty(files)
     fprintf('No .h5 files found under %s\n', root_dir);
@@ -41,7 +49,11 @@ function test_binsparse_roundtrip_dir(root_dir)
     try
         matrix = binsparse_read(file_path);
 
-        temp_file = [tempname(), '.bsp.h5'];
+        if isempty(temp_dir)
+            temp_file = [tempname(), '.bsp.h5'];
+        else
+            temp_file = [tempname(temp_dir), '.bsp.h5'];
+        end
         cleanup = onCleanup(@() cleanup_temp_file(temp_file));
 
         binsparse_write(temp_file, matrix);