Changeset 12448
- Timestamp:
- 02/11/10 12:16:51 (13 years ago)
- Location:
- trunk/abcl/src/org/armedbear/lisp
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abcl/src/org/armedbear/lisp/Pathname.java
r12441 r12448 1897 1897 if (Utilities.isPlatformWindows) { 1898 1898 if (destination.isFile()) { 1899 ZipCache.remove(destination); 1899 1900 destination.delete(); 1900 1901 } -
trunk/abcl/src/org/armedbear/lisp/ZipCache.java
r12446 r12448 167 167 public LispObject execute(LispObject arg) { 168 168 Pathname p = coerceToPathname(arg); 169 URL url = Pathname.makeURL(p); 170 boolean result = ZipCache.remove(url); 169 boolean result = ZipCache.remove(p); 171 170 return result ? T : NIL; 172 171 } 173 172 } 174 173 175 176 174 public static boolean remove(URL url) { 177 175 Entry entry = zipCache.get(url); … … 185 183 return false; 186 184 } 185 186 public static boolean remove(Pathname p) { 187 URL url = Pathname.makeURL(p); 188 if (url == null) { 189 return false; 190 } 191 return ZipCache.remove(url); 187 192 } 193 194 public static boolean remove(File f) { 195 Pathname p = Pathname.makePathname(f); 196 return ZipCache.remove(p); 197 } 198 199 } -
trunk/abcl/src/org/armedbear/lisp/delete_file.java
r12431 r12448 69 69 defaultedPathname)); 70 70 final File file = new File(namestring); 71 ZipCache.remove(file); 71 72 if (file.exists()) { 72 73 // File exists.
Note: See TracChangeset
for help on using the changeset viewer.