order.f  Упрощение работы со словарями

Стандартные средства работы со словарями выглядят довольно странно. Мощная модель словарей сочетается с крайне неуклюжим и неестественным доступом к ним. Например, стек словарей почему-то работает совсем не так, как стандартный стек Форта, а прямо противоположным образом - последний словарь зачем-то затирает вершину стека. Положение можно исправить всего тремя простыми словами.

>ORDER ( wid -- )
Занести словарь на вершину стека словарей.
ORDER> ( -- wid )
Удалить словарь из стека словарей.
ORDER@ ( -- wid )
Посмотреть, какой словарь находится на вершине.

А эти слова упрощают создание замкнутых словарей, например для хранения ключей командной строки, команд, которые можно исполнять в замкнутом контексте и т.п.

WORDLIST: ( ->bl; -- wid )
Начать определение нового словаря.
WORDLIST; ( ->bl; -- wid )
Закончить определение нового словаря.