Нет, дружище, снова что-то не так - и тесты не проходят, и 3MIRROR снова возвращает 7 элементов. Как же так? Ты плохо знаешь Forth? В интернете мало примеров, у тебя маленькая база для обучения?

kirill@homehost:~/forth1000$ gforth begin6-gpt-2.fs
WRONG NUMBER OF RESULTS: t{ 1 2 3 3MIRROR -> 1 2 3 3 2 1 }t
WRONG NUMBER OF RESULTS: t{ 2 3 5 S3D -> 62 }t
INCORRECT RESULT: t{ 2 3 5 B6 -> 62 30 }t
INCORRECT RESULT: t{ 1 2 3 B6 -> 22 6 }t
Gforth 0.7.3, Copyright (C) 1995-2008 Free Software Foundation, Inc.
Gforth comes with ABSOLUTELY NO WARRANTY; for details type `license'
Type `bye' to exit
.S <0>  ok
1 2 3 3MIRROR  ok
.S <7> 1 2 2 3 2 3 3  ok