change-r_scattered_pcrel_length_type_address ( object quot -- object )

Vocabulary

accessors

Inputs

object	an object
quot	an object

Outputs

object

an object

Definition

USING: kernel ;

IN: accessors

: change-r_scattered_pcrel_length_type_address
    ( object quot -- object )
    over
    [ [ r_scattered_pcrel_length_type_address>> ] dip call ] dip
    swap >>r_scattered_pcrel_length_type_address ; inline