remove is_url for speed

Author: scivision

+stdlib/absolute.m

@@ -25,8 +25,6 @@
 
 c = "";
 
-if stdlib.is_url(p), return; end
-
 if expand_tilde
   c = stdlib.expanduser(p);
 else

+stdlib/canonical.m

@@ -20,8 +20,6 @@
 
 c = "";
 
-if stdlib.is_url(p), return; end
-
 if expand_tilde
   e = stdlib.expanduser(p);
 else

+stdlib/expanduser.m

@@ -14,8 +14,6 @@
 
 e = "";
 
-if stdlib.is_url(p), return; end
-
 e = stdlib.drop_slash(p);
 
 L = stdlib.len(e);

+stdlib/is_absolute.m

@@ -13,8 +13,6 @@
 
 y = false;
 
-if stdlib.is_url(p), return, end
-
 L = stdlib.len(p);
 if ~L || (ispc && L < 3)
   return

+stdlib/normalize.m

@@ -17,7 +17,6 @@
 end
 
 n = stdlib.posix(p);
-if ~stdlib.len(n) && stdlib.is_url(p), return, end
 
 uncslash = ispc && startsWith(n, "//");
 

+stdlib/parent.m

@@ -15,9 +15,6 @@
 p = stdlib.drop_slash(pth);
 
 if ~stdlib.len(p)
-  if ~stdlib.is_url(pth)
-    p = ".";
-  end
   return
 elseif is_root_stub(p)
   % 2 or 3 char drive letter

+stdlib/posix.m

@@ -8,9 +8,6 @@
   p (1,1) string
 end
 
-r = "";
-if stdlib.is_url(p), return, end
-
 if ispc
   r = strrep(p, '\', '/');
 else

+stdlib/root_name.m

@@ -12,7 +12,7 @@
 
 r = "";
 
-if ~ispc || stdlib.len(p) < 2 || stdlib.is_url(p), return, end
+if ~ispc || stdlib.len(p) < 2, return, end
 
 if ischar(p)
   if p(2) == ':' && isletter(p(1)) %#ok<UNRCH>

+stdlib/windows_shortname.m

@@ -14,9 +14,6 @@
   p (1,1) string
 end
 
-s = "";
-if stdlib.is_url(p), return, end
-
 s = p;
 if ispc
   fso = actxserver('Scripting.FileSystemObject');

src/pure.cpp

@@ -38,9 +38,6 @@ bool fs_is_windows()
 
 std::string fs_as_posix(std::string_view path)
 {
-  if (fs_is_url(path))
-    return {};
-
   std::filesystem::path p(path);
 
   return p.generic_string();