More forth stuff