#! perl -slw
use 5.010;
use strict;
use Inline C => Config => BUILD_NOISY => 1;
use Inline C => <<'END_C',  NAME => '_junk', CLEAN_AFTER_BUILD => 0;

void doit( SV *dummy ) {
    int i = -1;
    unsigned int j = i;

    printf( "i: %d : %4x\n", i, i );
    printf( "j: %u : %4x\n", j, j );
}
END_C

doit( 1 );
__END__
C:\test>junk
...
i: -1 : ffffffff
j: 4294967295 : ffffffff