X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pod%2Fperlxs.pod;h=98a983422f1ebd55ac7776ef72cdecec399e3c25;hb=04251ce85fbe7037c3a7ca309ab31a0207c941b3;hp=1eea753c619186e9862ded08211452efbd52b9f4;hpb=7ad6fb0b9459a71263eb7a8d4bdadd83ca0ca946;p=p5sagit%2Fp5-mst-13.2.git diff --git a/pod/perlxs.pod b/pod/perlxs.pod index 1eea753..98a9834 100644 --- a/pod/perlxs.pod +++ b/pod/perlxs.pod @@ -181,10 +181,10 @@ directive is used which sets ST(0) explicitly. Older versions of this document recommended to use C return value in such cases. It was discovered that this could lead to -segfaults in cases when XSUB was I C. This practice is +segfaults in cases when XSUB was I C. This practice is now deprecated, and may be not supported at some future version. Use the return value C in such cases. (Currently C contains -some heuristic code which tries to disambiguate between "truely-void" +some heuristic code which tries to disambiguate between "truly-void" and "old-practice-declared-as-void" functions. Hence your code is at mercy of this heuristics unless you use C as return value.) @@ -372,7 +372,7 @@ and C<$type> can be used as in typemaps. bool_t rpcb_gettime(host,timep) - char *host = (char *)SvPV($arg,na); + char *host = (char *)SvPV($arg,PL_na); time_t &timep = 0; OUTPUT: timep @@ -387,16 +387,16 @@ the same line where the input variable is declared. If the initialization begins with C<;> or C<+>, then it is output after all of the input variables have been declared. The C<=> and C<;> cases replace the initialization normally supplied from the typemap. -For the C<+> case, the initialization from the typemap will preceed +For the C<+> case, the initialization from the typemap will precede the initialization code included after the C<+>. A global -variable, C<%v>, is available for the truely rare case where +variable, C<%v>, is available for the truly rare case where information from one initialization is needed in another initialization. bool_t rpcb_gettime(host,timep) time_t &timep ; /*\$v{time}=@{[$v{time}=$arg]}*/ - char *host + SvOK($v{time}) ? SvPV($arg,na) : NULL; + char *host + SvOK($v{time}) ? SvPV($arg,PL_na) : NULL; OUTPUT: timep @@ -553,9 +553,10 @@ The XS code, with ellipsis, follows. time_t timep = NO_INIT PREINIT: char *host = "localhost"; + STRLEN n_a; CODE: if( items > 1 ) - host = (char *)SvPV(ST(1), na); + host = (char *)SvPV(ST(1), n_a); RETVAL = rpcb_gettime( host, &timep ); OUTPUT: timep @@ -681,7 +682,7 @@ return value, should the need arise. sv_setnv( ST(0), (double)timep); } else{ - ST(0) = &sv_undef; + ST(0) = &PL_sv_undef; } To return an empty list one must use a PPCODE: block and @@ -786,9 +787,10 @@ prototypes. PROTOTYPE: $;$ PREINIT: char *host = "localhost"; + STRLEN n_a; CODE: if( items > 1 ) - host = (char *)SvPV(ST(1), na); + host = (char *)SvPV(ST(1), n_a); RETVAL = rpcb_gettime( host, &timep ); OUTPUT: timep @@ -1212,13 +1214,15 @@ getnetconfigent() XSUB and an object created by a normal Perl subroutine. The typemap is a collection of code fragments which are used by the B compiler to map C function parameters and values to Perl values. The typemap file may consist of three sections labeled C, C, and -C. The INPUT section tells the compiler how to translate Perl values +C. Any unlabelled initial section is assumed to be a C +section if a name is not explicitly specified. The INPUT section tells +the compiler how to translate Perl values into variables of certain C types. The OUTPUT section tells the compiler how to translate the values from certain C types into values Perl can understand. The TYPEMAP section tells the compiler which of the INPUT and OUTPUT code fragments should be used to map a given C type to a Perl value. -Each of the sections of the typemap must be preceded by one of the TYPEMAP, -INPUT, or OUTPUT keywords. +The section labels C, C, or C must begin +in the first column on a line by themselves, and must be in uppercase. The default typemap in the C directory of the Perl source contains many useful types which can be used by Perl extensions. Some extensions define