[armedbear-cvs] r12974 - trunk/abcl/src/org/armedbear/lisp

Mark Evenson mevenson at common-lisp.net
Fri Oct 15 05:06:45 UTC 2010


Author: mevenson
Date: Fri Oct 15 01:06:42 2010
New Revision: 12974

Log:
Let truename() possibly signal an error on r12793 JRockit fix.


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

Modified: trunk/abcl/src/org/armedbear/lisp/Pathname.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/Pathname.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/Pathname.java	Fri Oct 15 01:06:42 2010
@@ -2005,7 +2005,7 @@
                         if (entry != null) {
                             // ensure this isn't a directory
                             if (entry.isDirectory()) {
-                                return NIL;
+                                break jarfile;
                             }
                             try {
                                 InputStream input = jarFile.getInputStream(entry);




More information about the armedbear-cvs mailing list