normalize: only native needed

no speed advantage to other backends moved to example/

Author: scivision

+stdlib/+native/normalize.m

@@ -83,7 +83,7 @@
       end
     case 'perl'
       switch functionName
-        case {'get_uid', 'normalize'}
+        case {'get_uid'}
           if ispc(), continue, end
       end
     case 'python'

+stdlib/Backend.m

@@ -5,26 +5,40 @@
 %
 %%% Inputs
 % * p: path to normalize
-% * backend: backend to use
 %%% Outputs
-% * c: normalized path
-% * b: backend used
+% * n: normalized path
 
-function [n, b] = normalize(file, backend)
+function n = normalize(apath)
 arguments
-  file string
-  backend (1,:) string = ["native", "python", "perl"]
+  apath (1,1) string
 end
 
-o = stdlib.Backend(mfilename(), backend);
-
-if isscalar(file)
-  n = o.func(file);
+parts = split(apath, ["/", filesep]);
+i0 = 1;
+if startsWith(apath, "/" | filesep)
+  n = extractBefore(apath, 2);
+elseif ispc() && strlength(apath) >= 2 && ~stdlib.strempty(stdlib.root_name(apath))
+  n = parts(1);
+  i0 = 2;
 else
-  n = arrayfun(o.func, file);
+  n = "";
+end
+
+for i = i0:length(parts)
+  if ~ismember(parts(i), [".", ""])
+    if n == ""
+      n = parts(i);
+    elseif ismember(n, ["/", filesep])
+      n = n + parts(i);
+    else
+      n = n + "/" + parts(i);
+    end
+  end
 end
 
-b = o.backend;
+if stdlib.strempty(n)
+  n = ".";
+end
 
 
 end

+stdlib/normalize.m

@@ -1,6 +1,6 @@
 %% PERL.NORMALIZE normalize path
 %
-% Note: on Windows, walks up ".." despite specification and not doing so on Unix, 
+% Note: on Windows, walks up ".." despite specification and not doing so on Unix,
 % so we only allow this backend on Unix-like systems
 
 function n = normalize(apath)

+stdlib/+perl/normalize.m renamed to example/+perl/normalize.m

@@ -9,4 +9,8 @@
 
 backends = cellstr(stdlib.Backend().select(funcName));
 
+if isempty(backends)
+  error('Did not find any backends for function %s', funcName)
+end
+
 end

+stdlib/+python/normalize.m renamed to example/+python/normalize.m

@@ -3,15 +3,6 @@
     TestNormalize < matlab.unittest.TestCase
 
 properties (TestParameter)
-p
-d
-backend
-end
-
-
-methods (TestParameterDefinition, Static)
-function p = init_norm()
-
 p = {
   {"", "."}, ...
   {"a/..", "a/.."}, ...
@@ -25,9 +16,12 @@
   {"./a/.", "a"}, ...
   {"../a", "../a"}
 };
-
+d
 end
 
+
+methods (TestParameterDefinition, Static)
+
 function d = init_drop_slash()
 d = {...
 {"", ""}, ...
@@ -52,17 +46,13 @@
 
 end
 
-function backend = setupBackends()
-backend = init_backend("normalize");
-end
-
 end
 
 
 methods (Test)
 
-function test_normalize(tc, p, backend)
-c = stdlib.normalize(p{1}, backend);
+function test_normalize(tc, p)
+c = stdlib.normalize(p{1});
 
 tc.verifyEqual(c, p{2}, ...
   sprintf("normalize(%s)", p{1}))

example/private/init_backend.m

@@ -9,4 +9,8 @@
 
 backends = cellstr(stdlib.Backend().select(funcName));
 
+if isempty(backends)
+  error('Did not find any backends for function %s', funcName)
+end
+
 end