Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
A
asdf
Project overview
Project overview
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Boards
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Didier Verna
asdf
Commits
3e3581d2
Commit
3e3581d2
authored
Mar 02, 2013
by
Francois-Rene Rideau
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
2.31.6: disable deferred warnings check by default, until a smooth upgrade solution is found.
parent
db1eba60
Changes
10
Expand all
Hide whitespace changes
Inline
Side-by-side
Showing
10 changed files
with
79 additions
and
75 deletions
+79
-75
asdf.asd
asdf.asd
+1
-1
doc/index.html
doc/index.html
+53
-54
header.lisp
header.lisp
+1
-1
interface.lisp
interface.lisp
+1
-1
lisp-build.lisp
lisp-build.lisp
+8
-1
operation.lisp
operation.lisp
+1
-1
test/test-deferred-warnings.script
test/test-deferred-warnings.script
+2
-0
test/test8.script
test/test8.script
+10
-14
upgrade.lisp
upgrade.lisp
+1
-1
version.lisp-expr
version.lisp-expr
+1
-1
No files found.
asdf.asd
View file @
3e3581d2
...
...
@@ -74,7 +74,7 @@
:licence
"MIT"
:description
"Another System Definition Facility"
:long-description
"ASDF builds Common Lisp software organized into defined systems."
:version
"2.31.
5
"
;; to be automatically updated by make bump-version
:version
"2.31.
6
"
;; to be automatically updated by make bump-version
:depends-on
()
#+
asdf3
:encoding
#+
asdf3
:utf-8
;; For most purposes, asdf itself specially counts as a builtin system.
...
...
doc/index.html
View file @
3e3581d2
This diff is collapsed.
Click to expand it.
header.lisp
View file @
3e3581d2
;;; -*- mode: Common-Lisp; Base: 10 ; Syntax: ANSI-Common-Lisp -*-
;;; This is ASDF 2.31.
5
: Another System Definition Facility.
;;; This is ASDF 2.31.
6
: Another System Definition Facility.
;;;
;;; Feedback, bug reports, and patches are all welcome:
;;; please mail to <asdf-devel@common-lisp.net>.
...
...
interface.lisp
View file @
3e3581d2
...
...
@@ -134,7 +134,7 @@
#:apply-output-translations
#:compile-file*
#:compile-file-pathname*
#:*warnings-file-type*
#:*warnings-file-type*
#:enable-deferred-warnings-check
#:disable-deferred-warnings-check
#:enable-asdf-binary-locations-compatibility
#:*default-source-registries*
#:*source-registry-parameter*
...
...
lisp-build.lisp
View file @
3e3581d2
...
...
@@ -22,6 +22,7 @@
#:reify-deferred-warnings
#:reify-undefined-warning
#:unreify-deferred-warnings
#:reset-deferred-warnings
#:save-deferred-warnings
#:check-deferred-warnings
#:with-saved-deferred-warnings
#:warnings-file-p
#:warnings-file-type
#:*warnings-file-type*
#:enable-deferred-warnings-check
#:disable-deferred-warnings-check
#:current-lisp-file-pathname
#:load-pathname
#:lispize-pathname
#:compile-file-type
#:call-around-hook
#:compile-file*
#:compile-file-pathname*
...
...
@@ -446,9 +447,15 @@ possibly in a different process."
((
:clozure
:ccl
)
"ccl-warnings"
)
((
:scl
)
"scl-warnings"
)))
(
defvar
*warnings-file-type*
(
warnings-file-type
)
(
defvar
*warnings-file-type*
nil
"Type for warnings files"
)
(
defun
enable-deferred-warnings-check
()
(
setf
*warnings-file-type*
(
warnings-file-type
)))
(
defun
disable-deferred-warnings-check
()
(
setf
*warnings-file-type*
nil
))
(
defun
warnings-file-p
(
file
&optional
implementation-type
)
(
if-let
(
type
(
if
implementation-type
(
warnings-file-type
implementation-type
)
...
...
operation.lisp
View file @
3e3581d2
...
...
@@ -2,7 +2,7 @@
;;;; Operations
(
asdf/package:define-package
:asdf/operation
(
:recycle
:asdf/operation
:asdf
)
(
:recycle
:asdf/operation
:asdf
/action
:asdf
)
;; asdf/action for FEATURE pre 2.31.5.
(
:use
:asdf/common-lisp
:asdf/driver
:asdf/upgrade
)
(
:export
#:operation
...
...
test/test-deferred-warnings.script
View file @
3e3581d2
...
...
@@ -2,6 +2,8 @@
(in-package :asdf-test)
(enable-deferred-warnings-check)
(def-test-system :unintern-foo
:components ((:file "unintern-foo")))
(def-test-system :use-foo-only
...
...
test/test8.script
View file @
3e3581d2
...
...
@@ -2,19 +2,15 @@
;;; make sure we get a missing-component error
(in-package :asdf-test)
(progn
(trace operate)
(handler-case
(asdf:oos 'asdf:load-op 'system-does-not-exist)
(asdf:missing-component-of-version (c)
(declare (ignore c))
(error "Should not have gotten 'missing-component-of-version, dang"))
(asdf:missing-component (c)
(format t "got missing-component as expected: - ~%~A~%" c))
(:no-error (c)
(declare (ignore c))
(error "should have failed, oops"))))
(handler-case
(asdf:oos 'asdf:load-op 'system-does-not-exist)
(asdf:missing-component-of-version (c)
(declare (ignore c))
(error "Should not have gotten 'missing-component-of-version, dang"))
(asdf:missing-component (c)
(format t "got missing-component as expected: - ~%~A~%" c))
(:no-error (c)
(declare (ignore c))
(error "should have failed, oops")))
upgrade.lisp
View file @
3e3581d2
...
...
@@ -52,7 +52,7 @@ You can compare this string with e.g.: (ASDF:VERSION-SATISFIES (ASDF:ASDF-VERSIO
;; "3.4.5.67" would be a development version in the official upstream of 3.4.5.
;; "3.4.5.0.8" would be your eighth local modification of official release 3.4.5
;; "3.4.5.67.8" would be your eighth local modification of development version 3.4.5.67
(
asdf-version
"2.31.
5
"
)
(
asdf-version
"2.31.
6
"
)
(
existing-version
(
asdf-version
)))
(
setf
*asdf-version*
asdf-version
)
(
when
(
and
existing-version
(
not
(
equal
asdf-version
existing-version
)))
...
...
version.lisp-expr
View file @
3e3581d2
"2.31.
5
"
"2.31.
6
"
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