Sorry for so much noise, but I had another mistake to correct. For my
actual test to work the subroutine 'test' has to return a value. The
correct code is then
pp_def('test',
Pars=>'a(); [o] b();',
PMCode => q{
sub PDL::test { #
my ($a)=@_;
$b=PDL->null;
PDL::_test_int($a, $b);
return $b;
}
},
Code=> q{
$b()=2*$a();
},
);
Thanks,
Luis
ps. Later I'll go through the documentation.
--
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
