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
asdf
asdf
Commits
7f3523c9
Commit
7f3523c9
authored
Feb 08, 2010
by
Robert P. Goldman
Browse files
Tweak to quash Allegro warnings on nested reader conditionals.
parent
f287a975
Changes
1
Hide whitespace changes
Inline
Side-by-side
asdf.lisp
View file @
7f3523c9
;;; -*- mode: common-lisp; package: asdf; -*-
;;; This is asdf: Another System Definition Facility.
;;;
;;; Feedback, bug reports, and patches are all welcome:
...
...
@@ -206,6 +207,14 @@ Defaults to `t`.")
(
defparameter
+asdf-methods+
'
(
perform
explain
output-files
operation-done-p
))
#+
allegro
(
eval-when
(
:compile-toplevel
)
(
defparameter
*acl-warn-save*
(
when
(
boundp
'excl:*warn-on-nested-reader-conditionals*
)
excl:*warn-on-nested-reader-conditionals*
))
(
when
(
boundp
'excl:*warn-on-nested-reader-conditionals*
)
(
setf
excl:*warn-on-nested-reader-conditionals*
nil
)))
;;;; -------------------------------------------------------------------------
;;;; Cleanups before hot-upgrade.
;;;; Things to do in case we're upgrading from a previous version of ASDF.
...
...
@@ -2712,6 +2721,11 @@ with a different configuration, so the configuration would be re-read then."
(
when
*load-verbose*
(
asdf-message
";; ASDF, version ~a"
(
asdf-version
)))
#+
allegro
(
eval-when
(
:compile-toplevel
)
(
when
(
boundp
'excl:*warn-on-nested-reader-conditionals*
)
(
setf
excl:*warn-on-nested-reader-conditionals*
*acl-warn-save*
)))
(
pushnew
:asdf
*features*
)
;;(pushnew :asdf2 *features*) ;; do that when we reach version 2
...
...
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