add-rule ( rule ruleset -- )

Vocabulary

xmode.rules

Inputs

rule	an object
ruleset	an object

Outputs

None

Definition

USING: accessors kernel unicode ;

IN: xmode.rules

: add-rule ( rule ruleset -- )
    [ dup rule-chars* >upper swap ] dip rules>> inverted-index ;