test-ob-maxima: Revert last commit

* testing/lisp/test-ob-maxima.el:
(ob-maxima/matrix-output): Remove filtering of informational output.

Credit to Leo Butler.  From his post:

    Since those informational messages are written to stdout, do

    with_stdout("/dev/null", load(numericalio))$
    write_data ....

    to muffle the messages. Note that sbcl warnings are muffled by

    :lisp (setf sb-ext::*muffled-warnings* 'warning)
This commit is contained in:
Marco Wahl 2016-08-20 23:43:35 +02:00
parent 7afd7ebff5
commit 29942e6aa8
1 changed files with 1 additions and 12 deletions

View File

@ -67,18 +67,7 @@
(org-babel-next-src-block)
(should
(equal
'((1 2 3) (2 3 4) (3 4 5))
((lambda (lista)
"Drop disturbing lines.
This is a workaround to skip informational output from maxima."
(reverse
(reduce (lambda (x y)
(if (equal ";;" (car y))
x
(cons y x)))
lista)))
(cons nil
(org-babel-execute-src-block)))))))
'((1 2 3) (2 3 4) (3 4 5)) (org-babel-execute-src-block)))))
(provide 'test-ob-maxima)