add uninit function

Author: Remi-Gau

initCppRoi.m

@@ -3,21 +3,25 @@
 function initCppRoi()
 
   global CPP_ROI_INITIALIZED
+  global CPP_ROI_PATHS
 
   if isempty(CPP_ROI_INITIALIZED)
 
     % directory with this script becomes the current directory
-    WD = fileparts(mfilename('fullpath'));
+    thisDirectory = fileparts(mfilename('fullpath'));
 
     % we add all the subfunctions that are in the sub directories
-    addpath(genpath(fullfile(WD, 'src')));
-    addpath(fullfile(WD, 'lib', 'marsbar-0.44'));
+    CPP_ROI_PATHS = genpath(fullfile(thisDirectory, 'src'));
+    CPP_ROI_PATHS = cat(2, CPP_ROI_PATHS, ':', ...
+                fullfile(thisDirectory, 'lib', 'marsbar-0.44'));
+    
     marsbar('on');
     try
       marsbar('splash');
     catch
     end
 
+    addpath(CPP_ROI_PATHS, '-begin');
     CPP_ROI_INITIALIZED = true();
 
   else

uninitCppRoi.m

@@ -0,0 +1,20 @@
+% (C) Copyright 2021 CPP ROI developers
+
+function uninitCppRoi()
+    
+    global CPP_ROI_INITIALIZED
+    global CPP_ROI_PATHS
+    
+    if isempty(CPP_ROI_INITIALIZED) || ~CPP_ROI_INITIALIZED
+        fprintf('\n\nCPP_ROI not initialized\n\n');
+        return
+        
+    else
+        marsbar('off');
+        rmpath(CPP_ROI_PATHS);
+        CPP_ROI_INITIALIZED = false;
+        
+    end
+    
+end
+