int wrap_RegisterClient2(int cl_id, char* read_ip) {
  return RegisterClient2(cl_id, read_ip);
}

##</code><code>##

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

int test( int i ) {
    return i;
}

END_C

print test( 123 );
__END__
C:\test>test
123

##</code><code>##

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

int test( int *i ) {
    return *i;
}

END_C

print test( 123 );

__END__
C:\test>test
Warning. No Inline C functions bound to Perl in C:\test\test.pl
Check your C function definition(s) for Inline compatibility

Use of inherited AUTOLOAD for non-method main::test() is deprecated at C:\test\test.pl line 12.
Can't locate auto/main/test.al in @INC (@INC contains: C:\test\_Inline\lib C:/Perl64/site/lib C:/Perl64/lib .) at C:\test\test.pl line 12