Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
abcl
abcl
Commits
fcc47120
Commit
fcc47120
authored
Mar 24, 2014
by
mevenson@1c010e3e-69d0-11dd-93a8-456734b0d56f
Browse files
Find contrib based on system jar name.
From Olof-Joachim Frahm.
parent
febfa950
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/org/armedbear/lisp/abcl-contrib.lisp
View file @
fcc47120
...
...
@@ -97,6 +97,14 @@ Returns the pathname of the contrib if it can be found."
"Introspect runtime classpaths to find a loadable ABCL-CONTRIB."
(
or
(
ignore-errors
(
find-contrib-jar
))
(
ignore-errors
(
let
((
system-jar
(
find-system-jar
)))
(
when
system-jar
(
probe-file
(
make-pathname
:defaults
system-jar
:name
(
concatenate
'string
"abcl-contrib"
(
subseq
(
pathname-name
system-jar
)
4
)))))))
(
some
(
lambda
(
u
)
(
probe-file
(
make-pathname
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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