(write-c-defs) ( clang-state -- )

Vocabulary

libclang

Inputs

clang-state

an object

Outputs

None

Definition

USING: accessors assocs io kernel sequences sets sorting ;

IN: libclang

: (write-c-defs) ( clang-state -- )
    [
        c-defs-by-order>> sort-keys values
        [ def>out-forms ] each
    ] [
        [ [ members [ length ] inv-sort-by ] assoc-map ]
        change-out-forms-by-name
        out-forms>> sort-keys values write-lines
    ] bi ;