simple-type ( type base-c-type -- c-type )

Vocabulary

alien.fortran.private

Inputs

type	an object
base-c-type	an object

Outputs

c-type

an object

Definition

USING: accessors alien.fortran kernel ;

IN: alien.fortran.private

: simple-type ( type base-c-type -- c-type )
    swap
    [ dup size>> [ invalid-fortran-type ] [ drop ] if ]
    [ append-dimensions ] bi ;