This example in ANS Forth (restricted) interpreters gave me nightmares because I was dancing with the stack back and forth. No pun intended. With Lisp, it's a piece of cake.

http://www.ulisp.com/show?1FHA