[armedbear-devel] Unfair fresh-line.5 ANSI-TEST?

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?