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
abcl
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
0
Issues
0
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
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
abcl
abcl
Commits
95b62b9c
Commit
95b62b9c
authored
Oct 13, 2012
by
mevenson@1c010e3e-69d0-11dd-93a8-456734b0d56f
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
abcl-asdf: make 'com.sun.jna:jna' a synonym for a known, good jna mvn URI.
parent
1112187b
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
6 additions
and
5 deletions
+6
-5
contrib/abcl-asdf/abcl-asdf.lisp
contrib/abcl-asdf/abcl-asdf.lisp
+4
-5
contrib/abcl-asdf/maven-embedder.lisp
contrib/abcl-asdf/maven-embedder.lisp
+2
-0
No files found.
contrib/abcl-asdf/abcl-asdf.lisp
View file @
95b62b9c
...
...
@@ -103,17 +103,16 @@
Returns a string in JVM CLASSPATH format as entries delimited by
classpath separator string. Can possibly be a single entry denoting a
remote binary artifact."
(
let
((
name
(
asdf::component-name
mvn-component
)))
(
with-slots
(
name
group-id
artifact-id
version
)
mvn-component
(
if
(
find-mvn
)
(
with-slots
(
asdf::group-id
asdf::artifact-id
asdf::version
)
mvn-component
(
resolve-dependencies
asdf::group-id
asdf::artifact-id
asdf::version
))
(
cond
(
resolve-dependencies
group-id
artifact-id
version
))
(
cond
((
string=
name
"net.java.dev.jna/jna/3.4.0"
(
let
((
uri
#p"http://repo1.maven.org/maven2/net/java/dev/jna/jna/3.4.0/jna-3.4.0.jar"
))
(
values
(
namestring
uri
)
uri
))))
(
t
(
error
"Failed to resolve MVN component name ~A."
name
)))))
)
(
error
"Failed to resolve MVN component name ~A."
name
)))))
(
defun
as-classpath
(
classpath
)
"Break apart the JVM CLASSPATH string into a list of its consituents."
...
...
contrib/abcl-asdf/maven-embedder.lisp
View file @
95b62b9c
...
...
@@ -413,6 +413,8 @@ artifact and all of its transitive dependencies."
(
cond
((
=
(
length
result
)
3
)
(
resolve-dependencies
(
first
result
)
(
second
result
)
(
third
result
)))
((
string=
string
"com.sun.jna:jna"
)
(
resolve-dependencies
"net.java.dev.jna"
"jna"
"3.4.0"
))
(
t
(
apply
#'
resolve-dependencies
result
)))))
...
...
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