Changeset 14195
- Timestamp:
- 10/13/12 15:19:20 (8 years ago)
- Location:
- trunk/abcl/contrib/abcl-asdf
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abcl/contrib/abcl-asdf/abcl-asdf.asd
r14185 r14195 3 3 (asdf:defsystem :abcl-asdf 4 4 :author "Mark Evenson" 5 :version "0. 8.0"5 :version "0.9.0" 6 6 :depends-on (jss) 7 7 :components -
trunk/abcl/contrib/abcl-asdf/abcl-asdf.lisp
r14193 r14195 104 104 classpath separator string. Can possibly be a single entry denoting a 105 105 remote binary artifact." 106 (with-slots (name group-id artifact-id version) mvn-component 107 (if (find-mvn) 108 (resolve-dependencies group-id artifact-id version)) 109 (cond 110 ((string= name 111 "net.java.dev.jna/jna/3.4.0" 112 (let ((uri #p"http://repo1.maven.org/maven2/net/java/dev/jna/jna/3.4.0/jna-3.4.0.jar")) 113 (values (namestring uri) uri)))) 114 (t 115 (error "Failed to resolve MVN component name ~A." name))))) 116 106 (macrolet ((aif (something consequence alternative)) 107 `(let ((it ,(something))) 108 (if it 109 consequence 110 alternative))) 111 (let ((name (slot-value mvn-component 'asdf::name)) 112 (group-id (slot-value mvn-component 'asdf::group-id)) 113 (artifact-id (slot-value mvn-component 'asdf::artifact-id)) 114 (version (let ((it (slot-value mvn-component 'asdf::version))) 115 (cond 116 ((not it) 117 it) 118 (t 119 "LATEST"))))) 120 (if (find-mvn) 121 (resolve-dependencies group-id artifact-id version) 122 (cond 123 ((string= name 124 "net.java.dev.jna/jna/3.4.0" 125 (let ((uri #p"http://repo1.maven.org/maven2/net/java/dev/jna/jna/3.4.0/jna-3.4.0.jar")) 126 (values (namestring uri) uri)))) 127 (t 128 (error "Failed to resolve MVN component name ~A." name))))))) 129 117 130 (defun as-classpath (classpath) 118 131 "Break apart the JVM CLASSPATH string into a list of its consituents."
Note: See TracChangeset
for help on using the changeset viewer.