[Maxima-bugs] [ maxima-Bugs-3288989 ] Lisp functions and linear display

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

Bugs item #3288989, was opened at 2011-04-18 20:38
Message generated for change (Tracker Item Submitted) made by crategus
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=104933&aid=3288989&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: 3
Private: No
Submitted By: Dieter Kaiser (crategus)
Assigned to: Nobody/Anonymous (nobody)
Summary: Lisp functions and linear display

Initial Comment:
Maxima has no problems with commands like ?cdr(labels) or ?trace(?meval). But it does not work, if we use linear display in Maxima.

(%i1) display2d:false;
(%o1) false

(%i2) ?cdr(labels);
(%o2) 
Maxima encountered a Lisp error:

 The value $%I2 is not of type LIST.
Automatically continuing.

To enable the Lisp debugger set *debugger-hook* to nil.

(%i3) ?trace(?meval);
(%o3) 
Maxima encountered a Lisp error:

 The value MEVAL is not of type LIST.

Automatically continuing.
To enable the Lisp debugger set *debugger-hook* to nil.

It is not a problem of the evaluator. It is a problem of display only. In 2D-display the function DIMENSION checks for Lisp expressions and puts a (MPROGN) onto the Lisp expression. But this is not done in MSIZE, when we use linear display.

To get a linear display for Lisp expressions we can add the following line to the function MSIZE:

   ((and (atom (car x)) (setq x (cons '(mprogn) x)) nil))

Furthermore, we have to add the line

   (defprop mprogn ((#\( ) #\) ) strsym)

With this corrections we no longer get Lisp errors, if we try to display a Lisp expression in linear display.

Dieter Kaiser

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

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