🚀 go-pugleaf

There is also a public domain XLISP and PROLOG (built on top of it).
Also, Dragon has released a demo version of their FORTH which I belive
does everything the full blown FORTH does except file transfer.  I have
found that demo very useful - I have learned to program in FORTH using
it and I have been able to judge the speed of FORTH through benchmark
programs.  Incidentally, I have found that FORTH is about 100 times faster
than ST BASIC.  For example, the following program computes the 26th
fibonacci number in 25 seconds: (recursive program - for benchmark)

: FIB 0 SWAP -1 * SWAP BEGIN SWAP FIRST SEC OVER 0 = UNTIL SWAP DROP ;
: FIRST BEGIN 1+ DUP 1+ DUP -3 > UNTIL ;
: SEC + -1 * OVER 0 > IF BEGIN + OVER 0 > NOT UNTIL THEN ;

This example also helped convince me that I should not be programming in
FORTH.  Incidentally, if anyone has a less cumbersome way to write a
FORTH program for fibonacci please send it to me.  (I know there is a 
fast iterative solution to fibonacci - this is uninteresting as a benchmark -
I would like to know of a better recursive solution - what I have done above
is use the sign bit to indicate whether search is proceeding to the "left"
or to the "right".  Surely there is a better way - what would happen if
there were a middle son to be expanded?  Would I have to use another stack
word to save the "return address"?)

John Franco
franco@indiana