forth bug fix