Hi Jon - also works on windows 64bit version : : : ff 0 if 77 else 88 then ; -> +DefineWord Done defining ff as (0 $200243534) t -> tempStack:
-> +DefineWord Done defining fac as (_dup_ 1 _>_ $200244051) 5 fac .s -> (120) On Fri, Aug 26, 2016 at 11:26 AM, Brian Walker <bwb...@gmail.com> wrote: > Hi Jon, > > works great for me on linux 64bit version. > > /taj33n > > > Am 26.08.2016 um 15:53 schrieb Jon Kleiser: > >> Hi, >> >> This summer I have had some fun trying to figure out how to implement a >> super simple toy Forth. For a start, I chose PicoLisp as an implementation >> language. You may find it here: >> >> https://github.com/jkleiser/toy-forth-in-picolisp >> >> There is one problem, however, occurring quite regularly when I run this >> forth.l using 32-bit PicoLisp on Mac. As the README.md suggests, I start it >> by doing this >> >> pil path/to/forth.l + >> >> If I then enter “: ff 0 if 77 else 88 then ;” (without the quotes), which >> defines a new word “ff” (which when used always pushes 88 on the stack), >> and then enter “t”, which is a (non-standard) word just for checking the >> state of the “tempStack” field (probably empty), then I usually get a >> “Segmentation fault: 11”. >> >> I have not seen that problem when using 64-bit PicoLisp (in Docker). >> >> Is this Segmentation fault caused by a bug in 32-bit PicoLisp, or is it >> me doing something stupid? >> >> Have a nice weekend! >> >> /JonPԔ � &j)m����X��� � �zV�u�.n7�� ���r��e=== >> >> -- > UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe >
