Please help me with starting an interface to lapack.Chris Marshall (marshallch) requested that I'll put my progress and questions onto this list.
I've come as far as installing PDL and starting to use inlpp_link.pl as a template. I set up attached .pl file. This does not compile, as line 64 does not parse.I've attached out.pdlpp, as this contains the error code: Invalid pdl def int n (regex byte|short|ushort|int|longlong|float|double) at (eval 16) line 7
PDL::PP::PdlParObj::new('PDL::PP::PdlParObj', 'int n',
'PDL_UNDEF_NUMBER', 0) called at (eval 13) line 7
I've tried to match what was done at Slatec, but there a different parser is
included.
The header for the specific function I am trying to call is:
extern void dgesv_(int *n, int *nrhs, double *a, int *lda, int *ipiv,
double *b, int *ldb, int *info);
lapack_link.pl
Description: Perl program
Invalid pdl def int n (regex byte|short|ushort|int|longlong|float|double)
at (eval 16) line 7
PDL::PP::PdlParObj::new('PDL::PP::PdlParObj', 'int n',
'PDL_UNDEF_NUMBER', 0) called at (eval 13) line 7
PDL::PP::Signature::parse('int n;int nrhs;double [o]a(lda,n);int
lda;int [o]ipiv(n); dou...', 0) called at
/home/jhh/linsrc/PDL/blib/lib/PDL/PP/Signature.pm line 31
PDL::PP::Signature::new('PDL::PP::Signature', 'int n;int nrhs;double
[o]a(lda,n);int lda;int [o]ipiv(n); dou...', undef) called at
/home/jhh/linsrc/PDL/blib/lib/PDL/PP.pm line 1355
PDL::PP::Pars_nft('int n;int nrhs;double [o]a(lda,n);int lda;int
[o]ipiv(n); dou...', undef) called at /home/jhh/linsrc/PDL/blib/lib/PDL/PP.pm
line 324
PDL::PP::Rule::apply('PDL::PP::Rule=HASH(0x8d73a50)',
'HASH(0x8b56b20)') called at /home/jhh/linsrc/PDL/blib/lib/PDL/PP.pm line 3236
PDL::PP::translate('HASH(0x8b56b20)', 'ARRAY(0x8d83a28)') called at
/home/jhh/linsrc/PDL/blib/lib/PDL/PP.pm line 1038
PDL::PP::pp_def('dgsev', 'Pars', 'int n;int nrhs;double [o]a(lda,n);int
lda;int [o]ipiv(n); dou...', 'GenericTypes', 'ARRAY(0x8ab2880)', 'Code',
'dgesv_($P(n), $P(nrhs), $P(a), $P(lda), $P(ipiv), $P(b), $P(l...') called at
lapack_link_pl_c24d.pd line 17
Inline running PDL::PP version 2.2...
_______________________________________________ Perldl mailing list [email protected] http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
