xml>field ( xml -- field )

Vocabulary

gobject-introspection.loader

Inputs

xml

an object

Outputs

field

an object

Definition

USING: accessors combinators gobject-introspection.repository
kernel math.parser xml.data ;

IN: gobject-introspection.loader

: xml>field ( xml -- field )
    [ field new ] dip {
        [ "name" attr >>name ]
        [ "writable" attr "1" = >>writable? ]
        [ "bits" attr string>number >>bits ]
        [ child-type-tag xml>type >>type ]
    } cleave ;