[Maxima-bugs] [ maxima-Bugs-1467778 ] Debug output provokes Clisp complaint about closed stream

[SourceForge.net <no...@so...>]

Bugs item #1467778, was opened at 2006-04-10 11:16
Message generated for change (Comment added) made by rtoy
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=104933&aid=1467778&group_id=4933

Please note that this message will contain a full copy of the comment thread,
including the initial issue submission, for this request,
not just the latest update.
Category: Lisp Core
Group: None
Status: Open
Resolution: None
Priority: 5
Submitted By: Robert Dodier (robert_dodier)
Assigned to: Nobody/Anonymous (nobody)
Summary: Debug output provokes Clisp complaint about closed stream

Initial Comment:
Sometimes the quadpack functions want to print debug
messages. Clisp doesn't like that, GCL and SBCL think
it's OK. I don't know a workaround.

Probably the problem has something to do with the way
Fortran WRITE statements get translated into Lisp.


Clisp 2.34:
(%i1) quad_qags (sin(x), x, 0, 200*%pi), numer;
Maxima encountered a Lisp error:
 
WRITE-CHAR on #<CLOSED IO TERMINAL-STREAM> is illegal


GCL 2.6.7:
(%i1) quad_qags (sin(x), x, 0, 200*%pi), numer;

Compiling gazonk0.lsp.
[...]
 ***MESSAGE FROM ROUTINE DQAGS IN LIBRARY SLATEC.
 ***INFORMATIVE MESSAGE, PROG CONTINUES, TRACEBACK
REQUESTED
 *  ABNORMAL RETURN
 *  ERROR NUMBER = 2
 *   
 ***END OF MESSAGE
 
(%o1) [- 2.2784436628435217E-13,
3.9575719140433691E-12, 21, 2]

SBCL 0.9.9:

(%i1) quad_qags (sin(x), x, 0, 200*%pi), numer;
 ***MESSAGE FROM ROUTINE DQAGS IN LIBRARY SLATEC.
 ***INFORMATIVE MESSAGE, PROG CONTINUES, TRACEBACK
REQUESTED
 *  ABNORMAL RETURN
 *  ERROR NUMBER = 2
 *   
 ***END OF MESSAGE
 
(%o1) [2.407196885346775e-12, 3.955640448980319e-12, 21, 2]


----------------------------------------------------------------------

>Comment By: Raymond Toy (rtoy)
Date: 2006-05-06 09:49

Message:
Logged In: YES 
user_id=28849

I don't see this with clisp with current cvs.  With clisp 2.38.

----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=104933&aid=1467778&group_id=4933