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
16
Issues
16
List
Boards
Labels
Service Desk
Milestones
Merge Requests
8
Merge Requests
8
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
160a8398
Commit
160a8398
authored
Jan 03, 2013
by
Francois-Rene Rideau
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Fix upgrade tests for GCL 2.6.
parent
47a234ba
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
6 additions
and
5 deletions
+6
-5
Makefile
Makefile
+4
-3
test/script-support.lisp
test/script-support.lisp
+2
-2
No files found.
Makefile
View file @
160a8398
...
...
@@ -7,7 +7,7 @@ sourceDirectory := $(shell pwd)
ifdef
ASDF_TEST_LISPS
lisps
?=
${ASDF_TEST_LISPS}
else
lisps
?=
ccl clisp sbcl ecl ecl_bytecodes cmucl abcl scl allegro lispworks allegromodern xcl
lisps
?=
ccl clisp sbcl ecl ecl_bytecodes cmucl abcl scl allegro lispworks allegromodern xcl
gcl
endif
export
ASDF_OUTPUT_TRANSLATIONS
:=
(
:output-translations
(
t
(
"
${sourceDirectory}
/tmp/fasls"
:implementation
))
:ignore-inherited-configuration
)
...
...
@@ -100,7 +100,7 @@ test-upgrade:
use_abcl
()
{
li
=
"
${ABCL}
--noinit --nosystem --noinform"
;
ev
=
"--eval"
;
}
;
\
use_xcl
()
{
li
=
"
${XCL}
--noinit --nosystem --noinform"
;
ev
=
"--eval"
;
}
;
\
use_scl
()
{
li
=
"
${SCL}
-noinit"
;
ev
=
"-eval"
;
}
;
\
use_gcl
()
{
li
=
"GCL_ANSI=t
${GCL}
"
;
ev
=
"-eval"
;
}
;
\
use_gcl
()
{
li
=
"
env
GCL_ANSI=t
${GCL}
"
;
ev
=
"-eval"
;
}
;
\
use_allegro
()
{
li
=
"
${ALLEGRO}
-q"
;
ev
=
"-e"
;
}
;
\
use_allegromodern
()
{
li
=
"
${ALLEGROMODERN}
-q"
;
ev
=
"-e"
;
}
;
\
use_lispworks
()
{
li
=
"
${LISPWORKS}
-siteinit - -init -"
;
ev
=
"-eval"
;
}
;
\
...
...
@@ -114,7 +114,7 @@ test-upgrade:
echo
"Testing upgrade from ASDF
$
${tag}
using method
$$
x"
;
\
git show
$
${tag}
:asdf.lisp
>
tmp/asdf-
$
${tag}
.lisp
;
\
case
${lisp}
:
$$
tag:
$$
x
in
\
abcl:2.0[01][1-9]|abcl:2.2[1-2]:
*
)
\
abcl:2.0[01][1-9]
:
*
|
abcl:2.2[1-2]:
*
)
\
: Skip, because it is so damn slow
;;
\
ccl:1.
*
|
ccl:2.0[01]
*
)
\
: Skip, because ccl broke old asdf
;;
\
...
...
@@ -122,6 +122,7 @@ test-upgrade:
: Skip, CMUCL has problems before 2.014.7 due to source-registry upgrade
;;
\
ecl
*
:1.
*
|
ecl
*
:2.0[01]
*
|
ecl
*
:2.20:
*
)
\
: Skip, because of various ASDF issues
;;
\
gcl:1.
*
|
gcl:2.0
*
|
gcl:2.2[0-6]
*
)
: Skip old versions that
do
not support GCL 2.6
;;
\
mkcl:1.
*
|
mkcl:2.0[01]
*
|
mkcl:2.2[0-3]:
*
)
\
: Skip, because MKCL is only supported starting with 2.24
;;
\
xcl:1.
*
|
xcl:2.00
*
|
xcl:2.01[0-4]:
*
|
xcl:
*
)
\
...
...
test/script-support.lisp
View file @
160a8398
...
...
@@ -52,14 +52,14 @@
#+
scl
:scl
#+
xcl
:xcl
))))
(
merge-pathnames
(
make-pathname
:directory
`
(
#-
gcl
<2.7
:relative
"tmp"
"fasls"
,
impl
)
(
make-pathname
:directory
`
(
#-
gcl
:relative
"tmp"
"fasls"
,
impl
)
:defaults
*asdf-directory*
)
*asdf-lisp*
))))
(
defun
load-old-asdf
(
tag
)
(
let
((
old-asdf
(
merge-pathnames
(
make-pathname
:directory
`
(
#-
gcl
<2.7
:relative
"tmp"
)
(
make-pathname
:directory
`
(
#-
gcl
:relative
"tmp"
)
:name
(
format
nil
"asdf-~A"
tag
)
:defaults
*asdf-directory*
)
*asdf-lisp*
)))
...
...
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