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?
armedbear-devel@common-lisp.net