Rebol 2: Использование правила синтаксического анализа для проверки ввода без кода

Question

Предположим, что у вас есть правило, подобное приведенному ниже: Rebol docs on parsing.

Если вы хотите проверить ввод данных с помощью правила только для его проверки, но без того, чтобы содержимое скобок было оценено, как вы можете это сделать?

Есть ли способ, который легко позволяет просто проверять входные данные против правила без содержания содержимого скобок?

rule: [ 
    set action ['buy | 'sell] 
    set number integer! 
    'shares 'at 
    set price money! 
    (either action = 'sell [ 
      print ["income" price * number] 
      total: total + (price * number) 
     ] [ 
      print ["cost" price * number] 
      total: total - (price * number) 
     ] 
    ) 
] 

Answer 1

Зависит, если вы имеете в виду синтаксический анализ или правила синтаксического анализа.

Для разбора правил вам понадобится специальный флаг и функцию, которая будет заботиться о нем:

do?: true 
parse-do: function [code] [if do? [do code]] 
rule: ['a (parse-do [print "got it"])] 
parse [a] rule 
do?: false 
parse [a] rule 

Для синтаксического анализа использования входного INTO:

>> parse [paren (1 + 1)]['paren into [integer! '+ integer!]] 
== true 

Answer 2

Ну, вы могли просто удалить parens from your rule:

unparen: func [b [block!]][forall b [case [ 
    paren! = type? b/1 [remove b] block! = type? b/1 [unparen b/1]]] head b] 
new-rule: unparen copy/deep rule 

Затем вы можете разобрать новое правило.

Я боюсь, что это все еще нарушает ваше «легко» требование, однако!

И он не обрабатывает ссылки на вложенные правила.

В качестве информативного в стороне теоретически нет ответа на ваш вопрос. Код в круглых скобках может, например, изменять правило.