Функция авто-модификации в виртуальной среде выполнения в Rebol

Question

Я хочу автоматически модифицировать функцию, как только она выполнится сама (контекст - это удаленное выполнение в виртуальной среде выполнения, которая использует общий блок кода, имитирующий стек функций (поскольку этот стек используется совместно, я хочу каждый раз сбрасывать всеследующий вызов команды) см., например, http://askblogautomation.com/developers-guide/) (полный контекст см. http://askblogautomation.com/install-wordpress/):

install-wordpress
set 'install-wordpress func[][do read http://askblogautomation.com/install-wordpress/]

Я хочу обобщить вышеприведенные строки с помощью

execute 'install-wordpress

Где выполнить это как показано ниже

execute: func[lit-word-command [lit-word!]][
  do get lit-word-command
  block-command: []
  append block-command [do read]
  append block-command to-url rejoin [http://askblogautomation.com/ lit-word-command]
  set lit-word-command func[] block-command
]

Но когда я попробовал это, он выдает ошибку:

** Ошибка сценария: выполнить ожидаемый аргумент команды lit-word типа: lit-word

Как это исправить?

Answer 1

Либо измените вызывающую строку:

 execute to-lit-word 'install-wordpress

Или измените спецификацию функции:

execute: func[lit-word-command [word!]][

Но не оба!