xml>namespace ( xml -- namespace )

Vocabulary

gobject-introspection.loader

Inputs

xml

an object

Outputs

namespace

an object

Definition

USING: accessors combinators gobject-introspection.repository
kernel sequences splitting xml.data xml.traversal ;

IN: gobject-introspection.loader

: xml>namespace ( xml -- namespace )
    [ namespace new ] dip {
        [ "name" attr >>name ]
        [
            "identifier-prefixes" attr "," split
            >>identifier-prefixes
        ]
        [ "symbol-prefixes" attr "," split >>symbol-prefixes ]
        [ "alias" tags-named [ xml>alias ] map >>aliases ]
        [ "constant" tags-named [ xml>const ] map >>consts ]
        [ "enumeration" tags-named [ xml>enum ] map >>enums ]
        [ "bitfield" tags-named [ xml>enum ] map >>bitfields ]
        [ "record" tags-named [ xml>record ] map >>records ]
        [ "union" tags-named [ xml>union ] map >>unions ]
        [ "boxed" tags-named [ xml>boxed ] map >>boxeds ]
        [
            "callback" tags-named [ xml>callback ] map
            >>callbacks
        ]
        [ "class" tags-named [ xml>class ] map >>classes ]
        [
            "interface" tags-named [ xml>interface ] map
            >>interfaces
        ]
        [ "function" load-functions >>functions ]
    } cleave [ postprocess-namespace ] keep ;