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
e25c7c5c
Commit
e25c7c5c
authored
Mar 18, 2013
by
Francois-Rene Rideau
Browse files
Make run-tests.sh more robust wrt creating output directory.
parent
1207fdf0
Changes
1
Hide whitespace changes
Inline
Side-by-side
test/run-tests.sh
View file @
e25c7c5c
...
...
@@ -239,7 +239,8 @@ fi
create_config
()
{
mkdir
-p
../build/test-source-registry-conf.d ../build/test-asdf-output-translations-conf.d
cd
${
ASDFDIR
}
mkdir
-p
build/results/ build/test-source-registry-conf.d build/test-asdf-output-translations-conf.d
}
upgrade_tags
()
{
if
[
-n
"
$ASDF_UPGRADE_TEST_TAGS
"
]
;
then
...
...
@@ -269,6 +270,8 @@ upgrade_methods () {
EOF
}
extract_tagged_asdf
()
{
cd
${
ASDFDIR
}
mkdir
-p
build/
tag
=
$1
if
[
REQUIRE
=
"
$tag
"
]
;
then return
0
;
fi
file
=
build/asdf-
${
tag
}
.lisp
;
...
...
@@ -326,7 +329,7 @@ valid_upgrade_test_p () {
}
run_upgrade_tests
()
{
cd
${
ASDFDIR
}
mkdir
-p
build/results
mkdir
-p
build/results
/
rm
-f
build/
*
.
*
f
*
uiop/
*
.
*
f
*
test
/
*
.
*
f
*
## Remove stale FASLs from ASDF 1.x, especially when different implementations have same name
ASDF_OUTPUT_TRANSLATIONS
=
"(:output-translations (
\"
${
ASDFDIR
}
\"
(
\"
${
ASDFDIR
}
/build/fasls/
\"
:implementation
\"
asdf/
\"
)) (t (
\"
${
ASDFDIR
}
/build/fasls/
\"
:implementation
\"
root/
\"
)) :ignore-inherited-configuration)"
export
ASDF_OUTPUT_TRANSLATIONS
...
...
@@ -349,9 +352,8 @@ run_upgrade_tests () {
fi
;
done
;
done
2>&1 |
tee
build/results/
${
lisp
}
-upgrade
.text
}
run_tests
()
{
cd
${
ASDFDIR
}
/test
create_config
mkdir
-p
../build/results
cd
./test/
echo
failure
>
../build/results/status
thedate
=
`
date
"+%Y-%m-%d"
`
do_tests
"
$@
"
2>&1 |
\
...
...
@@ -373,7 +375,8 @@ test_clean_load () {
case
$lisp
in
gcl|cmucl
)
return
0
;;
# These are hopeless
esac
mkdir
-p
build/results
cd
${
ASDFDIR
}
mkdir
-p
build/results/
nop
=
build/results/
${
lisp
}
-nop
.text
load
=
build/results/
${
lisp
}
-load
.text
${
cmd
}
${
eval
}
\
...
...
@@ -392,12 +395,16 @@ test_load_systems () {
case
$lisp
in
gcl
)
return
0
;;
# This one is hopeless
esac
cd
${
ASDFDIR
}
mkdir
-p
build/results/
echo
"Loading all these systems:
$*
"
${
cmd
}
${
eval
}
\
"(or #.(load
\"
test/script-support.lisp
\"
) #.(asdf-test::with-test () (asdf-test::test-load-systems
$*
)))"
\
2>&1 |
tee
build/results/
${
lisp
}
-systems
.text
}
test_interactively
()
{
cd
${
ASDFDIR
}
mkdir
-p
build/results/
rlwrap
$cmd
$eval
"(or #.(load
\"
test/script-support.lisp
\"
) #.(asdf-test::interactive-test '(
$*
)))"
}
...
...
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