[fortran-results>] ( return parameters -- quot )

Vocabulary

alien.fortran.private

Inputs

return	an object
parameters	an object

Outputs

quot

an object

Definition

USING: combinators kernel sequences ;

IN: alien.fortran.private

: [fortran-results>] ( return parameters -- quot )
    [ [fortran-result-shuffle] ] [ drop [fortran-return>] ]
    [ nip [ [fortran-out-param>] ] map concat ] 2tri append
    \ spread [ ] 2sequence append ;