|
|
|
last edited 17 years ago by kratt6 |
Edit detail for #371 iprint from InternalPrintPackage makes malformed call to FORCE-OUTPUT revision 2 of 2
| 1 2 | ||
|
Editor: kratt6
Time: 2007/12/28 13:03:16 GMT-8 |
||
| Note: | ||
added:
From kratt6 Fri Dec 28 13:03:02 -0800 2007
From: kratt6
Date: Fri, 28 Dec 2007 13:03:02 -0800
Subject:
Message-ID: <20071228130302-0800@axiom-wiki.newsynthesis.org>
Status: pending (next release) => closed
Alasdair McAndrew? points out that calls to iprint results in a hard error. He writes:
I was running a long program recently, and every now and again I wanted a little output to indicate how far the program had got. The "output" command includes a line feed, which I don't want. I've tried:
)set expose add constructor IPRNTPK
but then, for example:
for i in 1..10 repeat iprint(i::String)
produces the output:
1
>> System error:
FLUSH is invalid as a function.
Although not exactly reproducable on Silver, there is an error and the fix appears to be:
--- a/src/algebra/newdata.spad.pamphlet
+++ b/src/algebra/newdata.spad.pamphlet
@@ -49,7 +49,7 @@ InternalPrintPackage(): Exports == Implementation where
Implementation == add
iprint(s:String) ==
PRINC(coerce(s)@Symbol)$Lisp
- FORCE_-OUTPUT$Lisp
+ FORCE_-OUTPUT()$Lisp
fixed and commited --swilson, Wed, 11 Jul 2007 22:58:31 -0500 reply
Status: testing => pending (next release)
Status: pending (next release) => closed