name-table-entry ( addr -- group-index group-name )

Vocabulary

pcre.private

Inputs

addr

an object

Outputs

group-index	an object
group-name	an object

Definition

USING: alien alien.accessors alien.strings io.encodings.utf8
kernel math ;

IN: pcre.private

: name-table-entry ( addr -- group-index group-name )
    [ <alien> 1 alien-unsigned-1 ]
    [ 2 + <alien> utf8 alien>string ] bi ;