showcase

use NativeCall;
use Native::Types;
use TinyCC::Eval;

my $i := cref(longlong);

$i = 123;

EVAL q:to/__END__/, :lang<C>, :symbols(i => $i.VAR.ptr);
    extern long long i;
    int printf(const char *, ...);

    int main() {
        printf("%lli", i);
        i = 45;
    }
    __END__

say $i;