Forth fix