forth2 fix