Tiny stack-based language implementation (61 sloc, Python)
github.com
github.com
[ dup * ] is square
[ dup 2 < [ drop 1 ] [ dup 1 - fact * ] ifelse ] is fact
4 square .
5 fact .Still, the idea of Fortik is to encourage students to learn how simple interpreters work and to extend the language.