Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
asdf
asdf
Commits
81a4ffa1
Commit
81a4ffa1
authored
May 07, 2015
by
Francois-Rene Rideau
Browse files
Skip test-program on CMUCL if it can't dump an image at all.
That might be because of missing 32-bit compiler and libraries.
parent
0c3d4aa7
Changes
1
Hide whitespace changes
Inline
Side-by-side
test/test-program.script
View file @
81a4ffa1
...
...
@@ -27,7 +27,7 @@
(unless (find-system :lisp-invocation nil)
(leave-test "Couldn't find lisp-invocation. Probably your ASDF ext/ directory needs submodule update." 1))
(load-system :lisp-invocation)
(unless (version-satisfies (find-system :lisp-invocation) "1.0.
1
")
(unless (version-satisfies (find-system :lisp-invocation) "1.0.
4
")
(leave-test "Lisp-invocation library isn't new enough to test successfully. Probably your ASDF ext/ directory needs submodule update." 1))
;; Disable any user source registry.
(initialize-source-registry `(:source-registry :ignore-inherited-configuration))
...
...
@@ -54,6 +54,9 @@
(delete-file-if-exists img)
(DBG "- first create an executable image")
(make-hello-world 'image)
#+cmu
(unless (probe-file* img)
(leave-test "CMUCL seemingly can't find the 32-bit compiler and libraries required to dump images. Aborting test." 0))
(assert (probe-file* img) () "Can't find image file ~S" img)
(DBG "- then use this executable image")
...
...
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