oldk1331 wrote:
>
> Negative integer number should be considered as "atom" in parsing,
> so the prefix representation of INFROM "(^ - 1 (/ 1 2))" is OK, the problem
> is inside unparse:
>
> unparse x ==
> atom?(s : % := unparseInputForm(x)$Lisp) => strsym s
> concat [strsym a for
Negative integer number should be considered as "atom" in parsing,
so the prefix representation of INFROM "(^ - 1 (/ 1 2))" is OK, the problem
is inside unparse:
unparse x ==
atom?(s : % := unparseInputForm(x)$Lisp) => strsym s
concat [strsym a for a in destruct s]
unparseInputFor
The minimal example is this:
(4) -> x := sqrt(-1)::EXPR INT
┌───┐
(4) \│- 1
Type:
Expression(Integer)
(5) -> x::InputForm
(5) (^ - 1 (/ 1 2))
Type:
InputForm
(6)