Fixed forth.lua a bit