Hi,
well i haven't been working with Inline module before and i find the cookbook a bit confusing. So could anyone help me figure this thing out. What i have is an array of numbers that i wish to pass into "rain()" function, print its elements and return the number 5.

use strict;
my @v = (1,2,3,4);
my $r = rain(\@v);

print "$r\n";


use Inline C => <<'CC';

int rain(AV *a){
    Inline_Stack_Vars;
   int i;
   for (i = 0; i < Inline_Stack_Items; i++)
       printf("%d\n",Inline_Stack_Item(i));
   }
    Inline_Stack_Void;
   return 5;
}

CC
[download]

This code is obviously wrong. So, again, how do i do this ????

Thnx

Update:

also is it possible to omit this "Inline_Stack_Vars" and just use "a" as an array reference:

int rain(AV *a,int n){ // where n is the size of the array
   int i;
   for (i = 0; i < n; i++)
       printf("%d\n",a[i]);
   }
   return 5;
}
[download]

Update:

yeap, ok, never mind, i was confused vith SV* and AV*
++ moritz