19 comments

[ 2.5 ms ] story [ 22.7 ms ] thread
I still write some Forth occasionally, it's really awesome for embedded systems, as it runs on little MCUs like AVR. It's so cool to update the program without reflashing the MCU, and have potentially have an interactive interpreter on such low resource processors.

I think becoming proficient with Forth has also made me a better programmer in other languages; for example stack based iterative replacements for recursion come easier, as well as other stack based algorithms. It also makes understand the CPython VM a lot easier.

Some people compare FORTH with game GO or philosophy ZEN. Very simple rules. And you build an own universe. And all of this fits into a very small size. As you also mentioned.
Nice. Been meaning to dabble more with Forth since stumbling across the Forth Haiku Salon: http://forthsalon.appspot.com/
That's incredible. You should make a front page post of it.
(comment deleted)
I have a soft spot for stack-based languages.

Anyone played around with Factor?

Yes, it's truly a joy to program in. It's also covered pretty well in Seven more languages in Seven weeks.
I used Factor quite a bit in the early days. It's a great language and exploratory programming environment.
It's kind of a shame that you don't hear more about forth.
I've been writing a Forth Interpreter over the past weeks as a way to learn Rust. It's very motivating how quickly a working prototype can be whipped up; once the data structures are worked out it's basically done. There's a quiet beauty and elegance to Forth code that I can't really find anywhere else. At the same time, it's often frustratingly crufty.
It would be so sweet if the "(" and ")" were defined as push/pop from a secondary stack. So "(+ 1 2)" would always be equal to "1 2 +".

: ABS (IF (< DUP 0)) (THEN (- 0 SWAP)) ;

I created a FORTH like language some years ago. Also fun.

/home/user/st> more fibonacci

1#[." "#@@+#a-;]10,

/home/user/st> st fibonacci 45

1 1 2 3 5 8 13 21 34 55 89 144 233 377 610 987 1597 2584 4181 6765 10946 17711 28657 46368 75025 121393 196418 317811 514229 832040 1346269 2178309 3524578 5702887 9227465 14930352 24157817 39088169 63245986 102334155 165580141 267914296 433494437 701408733 1134903170

/home/user/st>

FORTH is a very old and unique language. Different from all the others. You can find it even in the space-ships.

http://www.forth.org

If you want to play with an online FORTH interpreter:

http://forthfreak.net/jsforth80x25.html

  ok
: fibo 1 dup 45 0 do . dup rot rot + dup loop ;

  ok
fibo

1 1 2 3 5 8 13 21 34 55 89 144 233 377 610 987 1597 2584 4181 6765 10946 17711 2 8657 46368 75025 121393 196418 317811 514229 832040 1346269 2178309 3524578 5702 887 9227465 14930352 24157817 39088169 63245986 102334155 165580141 267914296 43 3494437 701408733 1134903170 ok..

The Fibonacci numbers :-)