I got rid of the typemap mistake below by copying by hand the file
named in
perl -MPDL::Core::Dev -E 'say PDL::Core::Dev::PDL_TYPEMAP'
to the same directory where the .pd file lives. Is this (an automated
version of this) a reasonable solution? Is there a cleaner one?
Anyway, the code below still doesn't work for me, because when I use
PMCode in the package (below), use the package in a small program and
call the test function, I get the error
Undefined subroutine &PDL::test
If I don't use PMCode the program works fine.
Best regrards,
Luis
On Sun, Feb 05, 2017 at 08:27:23PM -0600, Luis Mochan wrote:
> I guess that my problem originates in my not knowing how to specify
> the appropriate typemap during the build process. I currently
> use Module::Build::Pluggable ('PDL', 'Fortran');
> in my Build.PL, but I have found no information in the Module::Build
> and related packages on how to setup the typemap. I'll appreciate any
> advice.
>
> Regards,
> Luis
>
>
> On Sun, Feb 05, 2017 at 11:22:00AM -0600, Luis Mochan wrote:
> > I tried to do a simple function to try out the PMCode solution, but I'm
> > missing something.
> > The following code defines a simple function that multiplies a pdl by 2.
> > ...
> > pp_def('test',
> > Pars=>'a(); [o] b();',
> > PMCode => q{
> > sub test { #
> > my ($a)=@_;
> > $b=PDL->null;
> > _test_int($a, $b);
> > }
> > },
> > Code=> q{
> > $b()=2*$a();
> > },
> > );
> > ...
> >
> > The PMCode doesn't do anything useful yet. I was just trying to
> > understand how to use it.
> >
> > If I remove all of the PMCode section, I can compile and install the
> > code and it works as expected. However, with the PMCode it produces an
> > error message:
> >
> > Could not find a typemap for C type 'pdl *'. The following C types
> > are mapped by the current typemap: 'AV *', 'Boolean', 'CV *', 'FILE
> > *', 'FileHandle', 'HV *', 'I16', 'I32', 'I8', 'IV', 'InOutStream',
> > 'InputStream', 'NV', 'OutputStream', 'PerlIO *', 'Result', 'STRLEN',
> > 'SV *', 'SVREF', 'SysRet', 'SysRetLong', 'Time_t *', 'U16', 'U32',
> > 'U8', 'UV', 'bool', 'bool_t', 'caddr_t', 'char', 'char *', 'char **',
> > 'const char *', 'double', 'float', 'int', 'long', 'short', 'size_t',
> > 'ssize_t', 'time_t', 'unsigned', 'unsigned char', 'unsigned char *',
> > 'unsigned int', 'unsigned long', 'unsigned long *', 'unsigned short',
> > 'void *', 'wchar_t', 'wchar_t *'
> >
> > The line that produces the error in the generated xs code is:
> >
> > void
> > _test_int(a,b)
> > pdl *a # <=This generates the error
> > pdl *b
> > CODE:
> > { pdl_test_struct *__privtrans;
> > int badflag_cache = 0;
> > ...
> >
> >
> > What am I doing wrong, or missing?
> >
> > Regards,
> >
> > Luis
> >
> >
> > On Sat, Feb 04, 2017 at 09:33:41PM -0600, Luis Mochan wrote:
> > >
> > >
> > > On Sat, Feb 04, 2017 at 02:56:45PM -0700, Craig DeForest wrote:
> > > > I seem to be late to the discussion, but this is exactly what I do. I
> > > > make heavy use of PMCode to condition and take care of any Stupid Index
> > > > Tricks that are needed, then hand that in to a PP routine that does the
> > > > work.
> > > >
> > > Thanks for the suggestion. I'll follow it.
> > > Best regards,
> > > Luis
> > >
> > >
> > > --
> > >
> > > o
> > > W. Luis Mochán, | tel:(52)(777)329-1734 /<(*)
> > > Instituto de Ciencias Físicas, UNAM | fax:(52)(777)317-5388 `>/ /\
> > > Apdo. Postal 48-3, 62251 | (*)/\/ \
> > > Cuernavaca, Morelos, México | [email protected] /\_/\__/
> > > GPG: 791EB9EB, C949 3F81 6D9B 1191 9A16 C2DF 5F0A C52B 791E B9EB
> > >
> > >
> > >
> > > ------------------------------------------------------------------------------
> > > Check out the vibrant tech community on one of the world's most
> > > engaging tech sites, SlashDot.org! http://sdm.link/slashdot
> > > _______________________________________________
> > > pdl-general mailing list
> > > [email protected]
> > > https://lists.sourceforge.net/lists/listinfo/pdl-general
> > >
> >
> > --
> >
> > o
> > W. Luis Mochán, | tel:(52)(777)329-1734 /<(*)
> > Instituto de Ciencias Físicas, UNAM | fax:(52)(777)317-5388 `>/ /\
> > Apdo. Postal 48-3, 62251 | (*)/\/ \
> > Cuernavaca, Morelos, México | [email protected] /\_/\__/
> > GPG: 791EB9EB, C949 3F81 6D9B 1191 9A16 C2DF 5F0A C52B 791E B9EB
> >
> >
> >
> > ------------------------------------------------------------------------------
> > Check out the vibrant tech community on one of the world's most
> > engaging tech sites, SlashDot.org! http://sdm.link/slashdot
> > _______________________________________________
> > pdl-general mailing list
> > [email protected]
> > https://lists.sourceforge.net/lists/listinfo/pdl-general
> >
>
> --
>
> o
> W. Luis Mochán, | tel:(52)(777)329-1734 /<(*)
> Instituto de Ciencias Físicas, UNAM | fax:(52)(777)317-5388 `>/ /\
> Apdo. Postal 48-3, 62251 | (*)/\/ \
> Cuernavaca, Morelos, México | [email protected] /\_/\__/
> GPG: 791EB9EB, C949 3F81 6D9B 1191 9A16 C2DF 5F0A C52B 791E B9EB
>
>
>
> ------------------------------------------------------------------------------
> Check out the vibrant tech community on one of the world's most
> engaging tech sites, SlashDot.org! http://sdm.link/slashdot
> _______________________________________________
> pdl-general mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/pdl-general
>
--
o
W. Luis Mochán, | tel:(52)(777)329-1734 /<(*)
Instituto de Ciencias Físicas, UNAM | fax:(52)(777)317-5388 `>/ /\
Apdo. Postal 48-3, 62251 | (*)/\/ \
Cuernavaca, Morelos, México | [email protected] /\_/\__/
GPG: 791EB9EB, C949 3F81 6D9B 1191 9A16 C2DF 5F0A C52B 791E B9EB
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, SlashDot.org! http://sdm.link/slashdot
_______________________________________________
pdl-general mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/pdl-general