Fresh-line.5 is a when we compare the output string againt a string
read from the file.. this means the test is contigent on the line
ending style of ABCL matching what SVN checkout did.
(deftest
(let (result)
(values
(with-output-to-string
(s)
(write-char #\Space s)
(setq result
(list
(multiple-value-list (notnot-mv (fresh-line s)))
(multiple-value-list (fresh-line s))
(multiple-value-list (fresh-line s)))))
result))
"
" ((t) (nil) (nil)))
I am thinking the compared to litteral needs to be a constant
programmatily contructed.
Such as a write-char #\Space + write-char #\Newline
Any thoughts of patch ideas for the ansi-tests?