Changeset 13026 for trunk/abcl/test/lisp/abcl/jar-pathname.lisp
- Timestamp:
- 11/17/10 15:55:47 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abcl/test/lisp/abcl/jar-pathname.lisp
r13024 r13026 342 342 (:absolute "c" "d") "foo" "lisp") 343 343 344 (deftest jar-pathname.10 345 (let ((s "jar:file:/foo/bar/a space/that!/this")) 346 (equal s 347 (namestring (pathname s)))) 348 t) 349 350 (deftest jar-pathname.11 351 (let ((s "jar:file:/foo/bar/a+space/that!/this")) 352 (equal s 353 (namestring (pathname s)))) 354 t) 355 356 344 357 (deftest jar-pathname.match-p.1 345 358 (pathname-match-p "jar:file:/a/b/some.jar!/a/system/def.asd"
Note: See TracChangeset
for help on using the changeset viewer.