find-section-symbol ( sections section symbol -- symbol/f )

Vocabulary

elf

Inputs

sections	an object
section	an object
symbol	an object

Outputs

symbol/f

an object

Definition

USING: kernel ;

IN: elf

: find-section-symbol
    ( sections section symbol -- symbol/f )
    [ find-section ] dip over
    [ [ symbols ] dip find-symbol ] [ 2drop f ] if ;