pprint-function-args ( types names -- )

Vocabulary

alien.prettyprint

Inputs

types	an object
names	an object

Outputs

None

Definition

USING: assocs kernel sequences ;

IN: alien.prettyprint

: pprint-function-args ( types names -- )
    zip
    [ ] [
        unclip-last
        [ [ first2 "," append pprint-function-arg ] each ] dip
        first2 pprint-function-arg
    ] if-empty ;