On 2013-02-12, Zbigniew Komarnicki <cblasius at gmail.com> wrote:
> Is there possible to change the behavior of "batch",
> that the following code in file "test.mac" after executing:
> batch("pp.mac")$
> will look more readable and not centered the input line?
Here's a short patch which causes 'batch' to display the input
expression in 1-d format (i.e. sans pretty printing), which I guess
is what you want.
There is no flag to change the way 'batch' displays stuff like that, and
I'm opposed to creating such a flag. However, I am leaning towards
always printing the input in 1-d format -- it makes it easier to
distinguish the input and output. Opinions from anyone else?
best
Robert Dodier
PS.
$ git diff src/macsys.lisp
diff --git a/src/macsys.lisp b/src/macsys.lisp
index ead7e8a..82e0854 100644
--- a/src/macsys.lisp
+++ b/src/macsys.lisp
@@ -186,7 +186,8 @@
(setq $__ (caddr r))
(unless $nolabels (set c-tag $__))
(cond (batch-or-demo-flag
- (displa `((mlabel) ,c-tag , $__))))
+ (let (($display2d nil))
+ (displa `((mlabel) ,c-tag , $__)))))
(setq time-before (get-internal-run-time)
etime-before (get-internal-real-time))
(setq area-before (used-area))