Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
A
asdf
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
15
Issues
15
List
Boards
Labels
Service Desk
Milestones
Merge Requests
9
Merge Requests
9
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Operations
Operations
Incidents
Environments
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
asdf
asdf
Commits
b4dc78de
Commit
b4dc78de
authored
Oct 08, 2013
by
Francois-Rene Rideau
2
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Cleanup: use the name uiop and uiop/foo instead of asdf/driver and asdf/foo in the code.
parent
a11e3738
Changes
23
Hide whitespace changes
Inline
Side-by-side
Showing
23 changed files
with
35 additions
and
31 deletions
+35
-31
action.lisp
action.lisp
+1
-1
backward-internals.lisp
backward-internals.lisp
+1
-1
bundle.lisp
bundle.lisp
+1
-1
cache.lisp
cache.lisp
+1
-1
component.lisp
component.lisp
+1
-1
concatenate-source.lisp
concatenate-source.lisp
+1
-1
defsystem.lisp
defsystem.lisp
+1
-1
find-component.lisp
find-component.lisp
+1
-1
find-system.lisp
find-system.lisp
+3
-1
footer.lisp
footer.lisp
+1
-1
interface.lisp
interface.lisp
+1
-1
lisp-action.lisp
lisp-action.lisp
+2
-2
operate.lisp
operate.lisp
+1
-1
operation.lisp
operation.lisp
+1
-1
output-translations.lisp
output-translations.lisp
+2
-2
plan.lisp
plan.lisp
+1
-1
source-registry.lisp
source-registry.lisp
+1
-1
system.lisp
system.lisp
+1
-1
uiop/driver.lisp
uiop/driver.lisp
+6
-4
uiop/package.lisp
uiop/package.lisp
+1
-1
uiop/stream.lisp
uiop/stream.lisp
+1
-1
uiop/utility.lisp
uiop/utility.lisp
+3
-3
upgrade.lisp
upgrade.lisp
+2
-2
No files found.
action.lisp
View file @
b4dc78de
...
...
@@ -4,7 +4,7 @@
(
asdf/package:define-package
:asdf/action
(
:nicknames
:asdf-action
)
(
:recycle
:asdf/action
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/component
:asdf/system
#:asdf/cache
:asdf/find-system
:asdf/find-component
:asdf/operation
)
(
:export
#:action
#:define-convenience-action-methods
...
...
backward-internals.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/backward-internals
(
:recycle
:asdf/backward-internals
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/system
:asdf/component
:asdf/operation
:asdf/find-system
:asdf/action
:asdf/lisp-action
)
(
:export
;; for internal use
...
...
bundle.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/bundle
(
:recycle
:asdf/bundle
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/component
:asdf/system
:asdf/find-system
:asdf/find-component
:asdf/operation
:asdf/action
:asdf/lisp-action
:asdf/plan
:asdf/operate
)
(
:export
...
...
cache.lisp
View file @
b4dc78de
...
...
@@ -2,7 +2,7 @@
;;;; Stamp cache
(
asdf/package:define-package
:asdf/cache
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
)
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
)
(
:export
#:get-file-stamp
#:compute-file-stamp
#:register-file-stamp
#:consult-asdf-cache
#:do-asdf-cache
#:call-with-asdf-cache
#:with-asdf-cache
#:*asdf-cache*
))
...
...
component.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/component
(
:recycle
:asdf/component
:asdf/defsystem
:asdf/find-system
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
)
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
)
(
:export
#:component
#:component-find-path
#:component-name
#:component-pathname
#:component-relative-pathname
...
...
concatenate-source.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/concatenate-source
(
:recycle
:asdf/concatenate-source
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/component
:asdf/operation
:asdf/system
:asdf/find-system
:asdf/defsystem
:asdf/action
:asdf/lisp-action
:asdf/bundle
)
...
...
defsystem.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/defsystem
(
:recycle
:asdf/defsystem
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/component
:asdf/system
:asdf/cache
:asdf/find-system
:asdf/find-component
:asdf/lisp-action
:asdf/operate
:asdf/backward-internals
)
...
...
find-component.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/find-component
(
:recycle
:asdf/find-component
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/component
:asdf/system
:asdf/find-system
)
(
:export
#:find-component
...
...
find-system.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/find-system
(
:recycle
:asdf/find-system
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/component
:asdf/system
:asdf/cache
)
(
:export
#:remove-entry-from-registry
#:coerce-entry-to-directory
...
...
@@ -243,7 +243,9 @@ Going forward, we recommend new users should be using the source-registry.
(
setf
(
gethash
(
coerce-name
system-name
)
*preloaded-systems*
)
keys
))
(
register-preloaded-system
"asdf"
:version
*asdf-version*
)
(
register-preloaded-system
"uiop"
:version
*asdf-version*
)
(
register-preloaded-system
"asdf-driver"
:version
*asdf-version*
)
(
register-preloaded-system
"asdf-defsystem"
:version
*asdf-version*
)
(
defmethod
find-system
((
name
null
)
&optional
(
error-p
t
))
(
declare
(
ignorable
name
))
...
...
footer.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/footer
(
:recycle
:asdf/footer
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/find-system
:asdf/find-component
:asdf/operation
:asdf/action
:asdf/lisp-action
:asdf/operate
:asdf/bundle
:asdf/concatenate-source
:asdf/output-translations
:asdf/source-registry
...
...
interface.lisp
View file @
b4dc78de
...
...
@@ -10,7 +10,7 @@
#:split
#:make-collector
#:loaded-systems
; makes for annoying SLIME completion
#:output-files-for-system-and-operation
)
; obsolete ASDF-BINARY-LOCATION function
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
:asdf/cache
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/cache
:asdf/component
:asdf/system
:asdf/find-system
:asdf/find-component
:asdf/operation
:asdf/action
:asdf/lisp-action
:asdf/output-translations
:asdf/source-registry
...
...
lisp-action.lisp
View file @
b4dc78de
...
...
@@ -4,8 +4,8 @@
(
asdf/package:define-package
:asdf/lisp-action
(
:recycle
:asdf/lisp-action
:asdf
)
(
:intern
#:proclamations
#:flags
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrad
e
:asdf/c
ache
:asdf/c
omponent
:asdf/system
:asdf/find-component
:asdf/find-system
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/cach
e
:asdf/component
:asdf/system
:asdf/find-component
:asdf/find-system
:asdf/operation
:asdf/action
)
(
:export
#:try-recompiling
...
...
operate.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/operate
(
:recycle
:asdf/operate
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/component
:asdf/system
:asdf/operation
:asdf/action
:asdf/find-system
:asdf/find-component
:asdf/lisp-action
:asdf/plan
)
(
:export
...
...
operation.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/operation
(
:recycle
:asdf/operation
:asdf/action
:asdf
)
;; asdf/action for FEATURE pre 2.31.5.
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
)
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
)
(
:export
#:operation
#:operation-original-initargs
#:original-initargs
;; backward-compatibility only. DO NOT USE.
...
...
output-translations.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/output-translations
(
:recycle
:asdf/output-translations
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
)
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
)
(
:export
#:*output-translations*
#:*output-translations-parameter*
#:invalid-output-translation
...
...
@@ -282,7 +282,7 @@ effectively disabling the output translation facility."
:return
(
translate-pathname*
p
absolute-source
destination
root
source
)
:finally
(
return
p
)))))
;; Hook into
asdf/driver
's output-translation mechanism
;; Hook into
uiop
's output-translation mechanism
#-
cormanlisp
(
setf
*output-translation-function*
'apply-output-translations
)
...
...
plan.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/plan
(
:recycle
:asdf/plan
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/component
:asdf/operation
:asdf/system
:asdf/cache
:asdf/find-system
:asdf/find-component
:asdf/operation
:asdf/action
:asdf/lisp-action
)
...
...
source-registry.lisp
View file @
b4dc78de
...
...
@@ -4,7 +4,7 @@
(
asdf/package:define-package
:asdf/source-registry
(
:recycle
:asdf/source-registry
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
:asdf/find-system
)
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/find-system
)
(
:export
#:*source-registry-parameter*
#:*default-source-registries*
#:invalid-source-registry
...
...
system.lisp
View file @
b4dc78de
...
...
@@ -3,7 +3,7 @@
(
asdf/package:define-package
:asdf/system
(
:recycle
:asdf
:asdf/system
)
(
:use
:
asdf/common-lisp
:asdf/driver
:asdf/upgrade
:asdf/component
)
(
:use
:
uiop/common-lisp
:uiop
:asdf/upgrade
:asdf/component
)
(
:export
#:system
#:proto-system
#:system-source-file
#:system-source-directory
#:system-relative-pathname
...
...
uiop/driver.lisp
View file @
b4dc78de
;;;; ---------------------------------------------------------------------------
;;;; Re-export all the functionality in
asdf/driver
;;;; Re-export all the functionality in
UIOP
(
uiop/package:define-package
:uiop/driver
(
:nicknames
:uiop
:asdf/driver
:asdf-driver
:asdf-utils
)
(
:use
:uiop/common-lisp
:uiop/package
:uiop/utility
:uiop/os
:uiop/pathname
:uiop/stream
:uiop/filesystem
:uiop/image
:uiop/os
:uiop/pathname
:uiop/stream
:uiop/filesystem
:uiop/image
:uiop/run-program
:uiop/lisp-build
:uiop/configuration
:uiop/backward-driver
)
(
:reexport
;; NB: excluding asdf/common-lisp
;; which include all of CL with compatibility modifications on select platforms.
;; NB: excluding uiop/common-lisp
;; which include all of CL with compatibility modifications on select platforms,
;; that could cause potential conflicts for packages that would :use (cl uiop)
;; or :use (closer-common-lisp uiop), etc.
:uiop/package
:uiop/utility
:uiop/os
:uiop/pathname
:uiop/stream
:uiop/filesystem
:uiop/image
:uiop/run-program
:uiop/lisp-build
...
...
uiop/package.lisp
View file @
b4dc78de
...
...
@@ -8,7 +8,7 @@
;; CAUTION: we must handle the first few packages specially for hot-upgrade.
;; This package definition MUST NOT change unless its name too changes;
;; if/when it changes, don't forget to add new functions missing from below.
;; Until then,
asdf
/package is frozen to forever
;; Until then,
uiop
/package is frozen to forever
;; import and export the same exact symbols as for ASDF 2.27.
;; Any other symbol must be import-from'ed and re-export'ed in a different package.
(
:use
:common-lisp
)
...
...
uiop/stream.lisp
View file @
b4dc78de
...
...
@@ -541,7 +541,7 @@ The file will be open with specified DIRECTION, ELEMENT-TYPE and EXTERNAL-FORMAT
:for
pathname
=
(
pathname
(
format
nil
"~A~36R"
prefix
counter
))
:do
;; TODO: on Unix, do something about umask
;; TODO: on Unix, audit the code so we make sure it uses O_CREAT|O_EXCL
;; TODO: on Unix, use CFFI and mkstemp -- but
asdf/driver
is precisely meant to not depend on CFFI or on anything! Grrrr.
;; TODO: on Unix, use CFFI and mkstemp -- but
UIOP
is precisely meant to not depend on CFFI or on anything! Grrrr.
(
with-open-file
(
stream
pathname
:direction
direction
:element-type
element-type
...
...
uiop/utility.lisp
View file @
b4dc78de
...
...
@@ -5,7 +5,7 @@
(
:nicknames
:asdf/utility
)
(
:recycle
:uiop/utility
:asdf/utility
:asdf
)
(
:use
:uiop/common-lisp
:uiop/package
)
;; import and reexport a few things defined in :
asdf
/common-lisp
;; import and reexport a few things defined in :
uiop
/common-lisp
(
:import-from
:uiop/common-lisp
#:compatfmt
#:loop*
#:frob-substrings
#+
ecl
#:use-ecl-byte-compiler-p
#+
mcl
#:probe-posix
)
(
:export
#:compatfmt
#:loop*
#:frob-substrings
#:compatfmt
...
...
@@ -68,9 +68,9 @@
;; undefining the previous function is the portable way
;; of overriding any incompatible previous gf, except on CLISP.
;; We usually try to do it only for the functions that need it,
;; which happens in asdf/upgrade - however, for ECL, we need this hammer
,
;; which happens in asdf/upgrade - however, for ECL, we need this hammer
;; (which causes issues in clisp)
,@
(
when
(
or
#-
clisp
supersede
#+
(
or
ecl
gcl2.7
)
t
)
; XXX
,@
(
when
(
or
#-
clisp
supersede
#+
(
or
ecl
gcl2.7
)
t
)
`
((
undefine-function
',name
)))
#-
gcl
; gcl 2.7.0 notinline functions lose secondary return values :-(
,@
(
when
(
and
#+
ecl
(
symbolp
name
))
; fails for setf functions on ecl
...
...
upgrade.lisp
View file @
b4dc78de
...
...
@@ -4,7 +4,7 @@
(
asdf/package:define-package
:asdf/upgrade
(
:recycle
:asdf/upgrade
:asdf
)
(
:use
:
asdf/common-lisp
:asdf/driver
)
(
:use
:
uiop/common-lisp
:uiop
)
(
:export
#:asdf-version
#:*previous-asdf-versions*
#:*asdf-version*
#:asdf-message
#:*verbose-out*
...
...
@@ -78,7 +78,7 @@ You can compare this string with e.g.: (ASDF:VERSION-SATISFIES (ASDF:ASDF-VERSIO
#:inherit-source-registry
#:process-source-registry
;; source-registry
#:process-source-registry-directive
#:trivial-system-p
;; bundle
;; NB: it's too late to do anything about
asdf-driver
functions!
;; NB: it's too late to do anything about
uiop
functions!
))
(
uninterned-symbols
'
(
#:*asdf-revision*
#:around
#:asdf-method-combination
...
...
François-René Rideau
@frideau
mentioned in commit
08095fe1
·
Nov 17, 2015
mentioned in commit
08095fe1
mentioned in commit 08095fe12a6219eed5cbecc0a7b6a7084d88c62e
Toggle commit list
François-René Rideau
@frideau
Mentioned in commit
08095fe1
·
Oct 05, 2016
Mentioned in commit
08095fe1
Mentioned in commit 08095fe12a6219eed5cbecc0a7b6a7084d88c62e
Toggle commit list
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