Changeset 15680 for trunk

Timestamp:

04/01/23 14:36:04 (6 months ago)

Author:

Mark Evenson

Message:

PATHNAME attempt use java.net.URI routines for getFile()

File:

• trunk/abcl/src/org/armedbear/lisp/Pathname.java (modified) (1 diff)

trunk/abcl/src/org/armedbear/lisp/Pathname.java

@@ -2167 +2167 @@
     String namestring = getNamestring(); // XXX UNC pathnames currently have no namestring
     if (namestring != null) {
-      return new File(namestring);
+      try {
+        URI uri = new URI(namestring);
+        return new File(uri);
+      } catch (URISyntaxException ex) {
+        return new File(namestring);
+      } catch (IllegalArgumentException e) {
+        return new File(namestring);
+      }
     }
     error(new FileError("Pathname has no namestring: " + princToString(),