Changeset 12608

Timestamp:

04/15/10 14:27:16 (13 years ago)

Author:

Mark Evenson

Message:

Don't throw LispError? on non existent jar for DIRECTORY.

File:

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

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

@@ -1544 +1544 @@
             jarPathname.type = NIL;
             jarPathname.invalidateNamestring();
-            // will propagate an appropiate Lisp error if jarPathname
-            // doesn't exist.
-            LispObject jarTruename = truename(jarPathname, true); 
-
+            LispObject jarTruename = truename(jarPathname, false); 
+            
+            // We can't match anything in a non-existent jar 
+            if (jarTruename == NIL) {
+                return NIL;
+            }
+            
             LispObject result = NIL;
             String wild = "/" + pathname.asEntryPath();