get-prop-named ( obj name -- prop/f )

Vocabulary

modern.html

Inputs

obj	an object
name	an object

Outputs

prop/f

an object

Definition

USING: accessors kernel sequences unicode ;

IN: modern.html

: get-prop-named ( obj name -- prop/f )
    [ props>> ] dip '[ first >lower _ = ] find nip ;