create-sum-type ( -- type )

Vocabulary

llvm.examples.sumfunc

Inputs

None

Outputs

type

an object

Definition

USING: alien.c-types alien.data arrays kernel llvm.ffi sequences
;

IN: llvm.examples.sumfunc

: create-sum-type ( -- type )
    LLVMInt32Type LLVMInt32Type LLVMInt32Type 2array
    [ void* >c-array ] [ length ] bi 0 LLVMFunctionType ;