1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
Description: Avoid test failure when installed under read-only directory
Do not try to open files installed under /usr/share/common-lisp/source for writing,
since it is bound to fail unless the CL implementation runs as root.
Author: Sébastien Villemot <sebastien@debian.org>
Forwarded: not-needed
Last-Update: 2018-03-27
---
This patch header follows DEP-3: http://dep.debian.net/deps/dep3/
--- a/test/test.lisp
+++ b/test/test.lisp
@@ -258,7 +258,7 @@ about each individual comparison if VERB
(merge-pathnames path-out *tmp-dir*)))
(full-path-orig (merge-pathnames path-out *this-file*)))
(dolist (direction-out '(:output :io))
- (dolist (direction-in '(:input :io))
+ (dolist (direction-in '(:input))
(when verbose
(format t "~&...directions ~S --> ~S" direction-in direction-out))
(copy-file full-path-in external-format-in
|
