perl-dev mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From "Gerald Richter" <rich...@ecos.de>
Subject Re: source_scan doesn't pick up new MPXS_ method :(
Date Tue, 27 Nov 2001 15:23:09 GMT


> I think I've tried all the combinations of possible ways to declare a
> function in the map file, but in vain -- it won't be picked by the
> source scan.
>

Source scan doesn't look at the maps files at all. Source scan only scans
the h files. Inside of Apache/ModPerl::ParseSource there are a lot of
condtions what should be included and what shouldn't.

The map files a picked up by xs_generate and put together with the
xs/tables/current/Apache|ModPerl/*Tables.pm to generate the XS code

So first of all you have to make sure that your function goes into
xs/tables/current/ModPerl/FunctionTable.pm. Does iT ?

If not you maybe have to alter the conditions in ModPerl::ParseSource, so it
gets parsed and included.

Gerald



> What I try to add is something like this:
>
> Index: xs/maps/modperl_functions.map
> ===================================================================
> RCS file: /home/cvs/modperl-2.0/xs/maps/modperl_functions.map,v
> retrieving revision 1.29
> diff -u -r1.29 modperl_functions.map
> --- xs/maps/modperl_functions.map 2001/11/15 18:19:56 1.29
> +++ xs/maps/modperl_functions.map 2001/11/27 14:31:37
> @@ -90,3 +90,6 @@
>   PACKAGE=Apache
>   DEFINE_LOG_MARK   | MPXS_Apache_LOG_MARK       | ...
>   DEFINE_warn       | MPXS_Apache__Log_log_error | ...
> +
> +PACKAGE=Apache::Broken
> + Apache__Broken_broken | MPXS_ | ...
> --- /dev/null Thu Jan  1 07:30:00 1970
> +++ xs/Apache/Broken/Apache__Broken.h Tue Nov 27 22:46:34 2001
> @@ -0,0 +1,3 @@
> +static XS(MPXS_Apache__Broken_broken)
> +{
> +}
>
> I've looked at all other XS(MPXS_...) functions but they all appear to
> be somewhat special. what do I miss?
>
> I've tried to use the usual mpxs_ style and ...:
>
> +PACKAGE=Apache::Broken
> + mpxs_Apache__Broken_broken |  | ...
>
> so I can work with:
>   (pTHX_ I32 items,SV **MARK, SV **SP) and just code in XS ppcode, but
> how do I get hold of 'cv'? I need it for modperl_sv2request_rec to
> convert ST(0) into request_rec object.
>
>
> _____________________________________________________________________
> Stas Bekman             JAm_pH      --   Just Another mod_perl Hacker
> http://stason.org/      mod_perl Guide   http://perl.apache.org/guide
> mailto:stas@stason.org  http://ticketmaster.com http://apacheweek.com
> http://singlesheaven.com http://perl.apache.org http://perlmonth.com/
>
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
> For additional commands, e-mail: dev-help@perl.apache.org
>
>


-------------------------------------------------------------
Gerald Richter    ecos electronic communication services gmbh
Internetconnect * Webserver/-design/-datenbanken * Consulting

Post:       Tulpenstrasse 5         D-55276 Dienheim b. Mainz
E-Mail:     richter@ecos.de         Voice:    +49 6133 925131
WWW:        http://www.ecos.de      Fax:      +49 6133 925152
-------------------------------------------------------------




---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org


Mime
View raw message