Re: Ersatz (sym? -.1) differs from pil32

[Alexander Burger]

Hi Jon,

> In Ersatz (17.1.25 JVM) I get this:
> 
> : (mapcar sym? '(+.1 -.1))
> -> (T NIL)
> 
> In 32-bit PicoLisp (16.12.8 C) I get this:
> 
> : (mapcar sym? '(+.1 -.1))
> -> (T T)
> 
> I have not tested this in 64-bit PicoLisp. Sorry. ;-)

It is the same on pil64.

Probably Ersatz is not correct here. The relevant code is in strToNum() in
ersatz/sys.src.

I must think about it. Or perhaps somebody else has a proposal?

♪♫ Alex
-- 
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe

Re: Ersatz (sym? -.1) differs from pil32

[Mike Pechkin]

# pil +
: (== 64 64)
-> T
: (version)
17.1.7
-> (17 1 7)
: (mapcar sym? '(+.1 -.1))
-> (T T)
:



On Tue, Feb 14, 2017 at 3:51 PM, Jon Kleiser  wrote:

> Hi,
>
> There seems to be a tiny difference between Ersatz and ordinary PicoLisp
> in the “sym?” function.
>
> In Ersatz (17.1.25 JVM) I get this:
>
> : (mapcar sym? '(+.1 -.1))
> -> (T NIL)
>
> In 32-bit PicoLisp (16.12.8 C) I get this:
>
> : (mapcar sym? '(+.1 -.1))
> -> (T T)
>
> I have not tested this in 64-bit PicoLisp. Sorry. ;-)
>
> /Jon

Ersatz (sym? -.1) differs from pil32

[Jon Kleiser]

Hi,

There seems to be a tiny difference between Ersatz and ordinary PicoLisp in the 
“sym?” function.

In Ersatz (17.1.25 JVM) I get this:

: (mapcar sym? '(+.1 -.1))
-> (T NIL)

In 32-bit PicoLisp (16.12.8 C) I get this:

: (mapcar sym? '(+.1 -.1))
-> (T T)

I have not tested this in 64-bit PicoLisp. Sorry. ;-)

/JonPԔ � )mX�����zV�u�.n7�