Skip to content
Snippets Groups Projects
Commit d08acb9a authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Fix test-encodings for ABCL.

parent a075e4be
No related branches found
No related tags found
No related merge requests found
...@@ -40,8 +40,8 @@ ...@@ -40,8 +40,8 @@
(leave-test "No Unicode support to test on this lisp implementation" 0) (leave-test "No Unicode support to test on this lisp implementation" 0)
#+abcl #+abcl
(let ((version (lisp-implementation-version)) (let* ((version (lisp-implementation-version))
(version-nums (subseq version 0 (position-if-not (lambda (x) (find x "0123456789.")) version)))) (version-nums (subseq version 0 (position-if-not (lambda (x) (find x "0123456789.")) version))))
(when (version< version-nums "1.1.2") (when (version< version-nums "1.1.2")
(leave-test "Your old ABCL is known to fail this test script, so skipping it." 0))) (leave-test "Your old ABCL is known to fail this test script, so skipping it." 0)))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment