vectorize

Author: scivision

+stdlib/expanduser.m

@@ -15,7 +15,7 @@
 end
 
 
-pat = ['~[/\', filesep(), ']+|^~$'];
+pat = ['~[/\', filesep, ']+|^~$'];
 
 [i0, i1] = regexp(p, pat, 'once');
 
@@ -30,9 +30,9 @@
 if i1 - i0 == 0 || strlength(p) == i1
   e = home;
 elseif isstring(p)
-  e = strjoin([home, extractAfter(p, i1)], filesep());
+  e = strjoin([home, extractAfter(p, i1)], filesep);
 else
-  e = strjoin({home, p(i1:end)}, filesep());
+  e = strjoin({home, p(i1:end)}, filesep);
 end
 
 if isstring(p)

+stdlib/filename.m

@@ -6,14 +6,7 @@
 % filename (including suffix) without directory
 
 function f = filename(p)
-arguments
-  p {mustBeTextScalar}
-end
 
-f = extractAfter(p, asManyOfPattern(wildcardPattern + ("/" | filesep())));
+f = extractAfter(p, asManyOfPattern(wildcardPattern + ("/" | filesep)));
 
 end
-
-
-%!assert (filename('a/b/c.txt'), 'c.txt')
-%!assert (filename('a/b/'), '')

+stdlib/root_dir.m

@@ -13,7 +13,7 @@
   p {mustBeTextScalar}
 end
 
-sep = characterListPattern("/" + filesep());
+sep = characterListPattern("/" + filesep);
 pat = (textBoundary + sep);
 if ispc()
   pat = pat | (lookBehindBoundary(lettersPattern(1) + ":") + sep);