Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
asdf
asdf
Commits
135437fb
Commit
135437fb
authored
Jun 16, 2006
by
Gary King
Browse files
now allows license / licence initargs and system-license / system-licence accessors
parent
29d10949
Changes
1
Show whitespace changes
Inline
Side-by-side
asdf.lisp
View file @
135437fb
;;; This is asdf: Another System Definition Facility. $Revision: 1.9
8
$
;;; This is asdf: Another System Definition Facility. $Revision: 1.9
9
$
;;;
;;;
;;; Feedback, bug reports, and patches are all welcome: please mail to
;;; Feedback, bug reports, and patches are all welcome: please mail to
;;; <cclan-list@lists.sf.net>. But note first that the canonical
;;; <cclan-list@lists.sf.net>. But note first that the canonical
...
@@ -78,6 +78,7 @@
...
@@ -78,6 +78,7 @@
#:system-author
#:system-author
#:system-maintainer
#:system-maintainer
#:system-license
#:system-license
#:system-licence
#:operation-on-warnings
#:operation-on-warnings
#:operation-on-failure
#:operation-on-failure
...
@@ -109,7 +110,7 @@
...
@@ -109,7 +110,7 @@
(
in-package
#:asdf
)
(
in-package
#:asdf
)
(
defvar
*asdf-revision*
(
let*
((
v
"$Revision: 1.9
8
$"
)
(
defvar
*asdf-revision*
(
let*
((
v
"$Revision: 1.9
9
$"
)
(
colon
(
or
(
position
#\:
v
)
-1
))
(
colon
(
or
(
position
#\:
v
)
-1
))
(
dot
(
position
#\.
v
)))
(
dot
(
position
#\.
v
)))
(
and
v
colon
dot
(
and
v
colon
dot
...
@@ -285,7 +286,8 @@ and NIL NAME and TYPE components"
...
@@ -285,7 +286,8 @@ and NIL NAME and TYPE components"
:accessor
system-long-description
:initarg
:long-description
)
:accessor
system-long-description
:initarg
:long-description
)
(
author
:accessor
system-author
:initarg
:author
)
(
author
:accessor
system-author
:initarg
:author
)
(
maintainer
:accessor
system-maintainer
:initarg
:maintainer
)
(
maintainer
:accessor
system-maintainer
:initarg
:maintainer
)
(
licence
:accessor
system-licence
:initarg
:licence
)))
(
licence
:accessor
system-licence
:initarg
:licence
:accessor
system-license
:initarg
:license
)))
;;; version-satisfies
;;; version-satisfies
...
...
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