nth-group ( n raw -- before nth )

Vocabulary

xmode.marker.private

Inputs

n	an object
raw	an object

Outputs

before	an object
nth	an object

Definition

USING: kernel math sequences ;

IN: xmode.marker.private

: nth-group ( n raw -- before nth )
    [ nth-group-start ] keep swap cut dup matching-paren 1 +
    head ;