# Pastebin YwxZ69N9
$ perl6 -MNativeCall -e '


sub gcc_jit_context_acquire() returns Pointer is native("gccjit") { * }

sub gcc_jit_context_get_type(Pointer $, int16) returns Pointer is native("gccjit") { * }


my Pointer $context = gcc_jit_context_acquire;

my Pointer $int-type = gcc_jit_context_get_type($context, 8);



say $int-type;


'
NativeCall::Types::Pointer<0x491c830>