shell fallback is_symlink

Author: scivision

+stdlib/+sys/is_symlink.m

@@ -0,0 +1,11 @@
+function ok = is_symlink(p)
+
+if ispc()
+  [s, m] = system(sprintf('pwsh -command "(Get-Item -Path %s).Attributes"', p));
+  ok = s == 0 && contains(m, 'ReparsePoint');
+else
+  [s, ~] = system(sprintf('test -L %s', p));
+  ok = s == 0;
+end
+
+end

+stdlib/is_symlink.m

@@ -7,6 +7,7 @@
 
 try
   ok = isSymbolicLink(p);
+  return
 catch e
   switch e.identifier
     case "MATLAB:UndefinedFunction"
@@ -16,11 +17,6 @@
         ok = java.nio.file.Files.isSymbolicLink(javaPathObject(stdlib.absolute(p)));
       elseif stdlib.has_python()
         ok = stdlib.python.is_symlink(p);
-      elseif isunix()
-        ok = system(sprintf('test -L %s', p)) == 0;
-      elseif ispc()
-        [s, m] = system(sprintf('pwsh -command "(Get-Item -Path %s).Attributes"', p));
-        ok = s == 0 && contains(m, 'ReparsePoint');
       end
     case "Octave:undefined-function"
       % use lstat() to work with a broken symlink, like Matlab isSymbolicLink
@@ -30,6 +26,10 @@
   end
 end
 
+if ~ok
+  ok = stdlib.sys.is_symlink(p);
+end
+
 end