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
Jan Moringen
asdf
Commits
ae6da4a8
Commit
ae6da4a8
authored
Nov 04, 2014
by
Francois-Rene Rideau
Browse files
Port the undeferred-warnings test to all supported tested implementations.
parent
ddca83ad
Changes
1
Hide whitespace changes
Inline
Side-by-side
test/test-undeferred-warnings.script
View file @
ae6da4a8
...
...
@@ -11,13 +11,14 @@
:components ((:file "fun-with-undefined-locals")))
#+(or allegro clozure cmu sbcl scl)
(progn
(errors #+(or allegro clozure) compile-file-error
#+(or cmu sbcl scl) null
(let ((*compile-file-warnings-behaviour* :error))
(load-system :undefined-variables)))
(errors #+(or allegro clozure) compile-file-error
#+(or cmu sbcl scl) null
(let ((*compile-file-warnings-behaviour* :warning))
(load-system :undefined-variables :force t))))
;; GCL fails to warn; CMUCL, SBCL and presumably SCL defer warning to end of compilation unit;
;; SCL and XCL not actually tested
(errors #+(or abcl allegro clisp clozure ecl lispworks mkcl xcl) compile-file-error
#+(or cmu gcl sbcl scl) null
(let ((*compile-file-warnings-behaviour* :error))
(load-system :undefined-variables)))
(errors #+(or abcl allegro clisp clozure ecl lispworks mkcl xcl) compile-file-error
#+(or cmu gcl sbcl scl) null
(let ((*compile-file-warnings-behaviour* :warning))
(load-system :undefined-variables :force t)))
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