Subscribe

2016-08-27 Thread Lindsay John Lawrence

Re: toy-forth-in-picolisp, and a 32-bit problem

2016-08-27 Thread Alexander Burger 
On Sat, Aug 27, 2016 at 10:56:55PM +0300, Mike Pechkin wrote:
> >
> > crashes? What is in the temp stack? Perhaps it is the fixed prin/prinl
> > issue of anonymous symbols.
> >
> >
> ​tempStack is list, look how it prints when not crashed​
> 
> http://pastebin.com/mTj51y4B

Yes, anonymous symbols. That explains all.

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

Re: toy-forth-in-picolisp, and a 32-bit problem

2016-08-27 Thread Mike Pechkin 
>
> crashes? What is in the temp stack? Perhaps it is the fixed prin/prinl
> issue of anonymous symbols.
>
>
​tempStack is list, look how it prints when not crashed​

http://pastebin.com/mTj51y4B

Re: toy-forth-in-picolisp, and a 32-bit problem

2016-08-27 Thread Mike Pechkin 
> Perhaps you can 'trace' to locate the exact place?
>
>
http://pastebin.com/kb6DGxpN

Re: toy-forth-in-picolisp, and a 32-bit problem

2016-08-27 Thread Alexander Burger 
On Sat, Aug 27, 2016 at 05:55:45PM +0300, Mike Pechkin wrote:
> As I wrote before, it didnt crash always
> 
> http://pastebin.com/JkVkBjbQ
> ...
> http://pastebin.com/mTj51y4B

I can't produce a crash here :(


Perhaps you can 'trace' to locate the exact place?


At the end of "forth.l" put (traceAll)

   
   (setq *F1 (new '(+Forth))
 *F2 (new '(+Forth)) )

   (traceAll)

   (if *EMUENV
  (activateEmuForthRepl *F1)
  # Normal PicoLisp ...
  (prinl (pack "-> "
 (forthRepl *F1) ) ) )

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

Re: toy-forth-in-picolisp, and a 32-bit problem

2016-08-27 Thread Jon Kleiser 
Thanks, Alex! I’ll give it a try a little later, but I’m sure it works.

/Jon

> On 26. aug. 2016, at 18.23, Alexander Burger  wrote:
> 
> On Fri, Aug 26, 2016 at 06:04:22PM +0200, Alexander Burger wrote:
>> Must be my fault. I never had the idea to 'prinl' an anonymous symbol
>> ('prinl' just low-level-outputs the names of symbols, but anonymous
>> symbols don't have a name ;)
>> 
>> Perhaps it works in pil64 just by chance. I'll check (and fix) both
>> versions).
> 
> OK, fixed it in pil32.
> 
> pil64 is all right, it did a proper check. And Ersatz and miniPicoLisp
> are also not affected :)
> 
> ♪♫ Alex
> -- 
> UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe