Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
A
asdf
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
15
Issues
15
List
Boards
Labels
Service Desk
Milestones
Merge Requests
9
Merge Requests
9
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Operations
Operations
Incidents
Environments
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
asdf
asdf
Commits
eb07bed2
Commit
eb07bed2
authored
Sep 01, 2016
by
Francois-Rene Rideau
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Tweak tests for CLISP
parent
83bbc23c
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
4 additions
and
1 deletion
+4
-1
test/asdf-pathname-test.script
test/asdf-pathname-test.script
+1
-1
test/test-logical-pathname.script
test/test-logical-pathname.script
+3
-0
No files found.
test/asdf-pathname-test.script
View file @
eb07bed2
...
...
@@ -364,7 +364,7 @@
:direction :output
:if-exists :supersede :if-does-not-exist :create)
(setup-asdftest-logical-host :root root)
#+(and asdf-test-logical-pathname
(not clisp)
)
#+(and asdf-test-logical-pathname)
(assert-pathname-equal
(make-pathname :host "ASDFTEST" :directory '(:absolute "system2" "module4")
:name nil :type nil)
...
...
test/test-logical-pathname.script
View file @
eb07bed2
...
...
@@ -48,6 +48,9 @@
(load-system :test-logical-pathname :force t)
#+abcl (leave-test "ABCL translates logical pathnames in *LOAD-PATHNAME*" 0)
#+clisp
(unless (version<= "2.50" (first (split-string (lisp-implementation-version) :separator "-+ ")))
(leave-test "CLISP 2.49 translates logical pathnames in *LOAD-PATHNAME*" 0))
(defparameter sys (find-system :test-logical-pathname))
(assert (logical-pathname-p (component-pathname sys)))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment