process-rule-result ( p result -- result )

Vocabulary

peg

Inputs

p	an object
result	an object

Outputs

result

an object

Definition

USING: accessors kernel namespaces ;

IN: peg

: process-rule-result ( p result -- result )
    [ nip [ ast>> ] [ remaining>> ] bi input-from pos set ]
    [ pos set fail ] if* ;