test.forth