On Thursday 15 September 2005 02:23, Sergey Plis wrote:
> Hi!
>
> I'm trying to bind some functions from libgsl. When I write binding
> for this function
>
> int gsl_blas_dgemm (CBLAS_TRANSPOSE_t TransA, CBLAS_TRANSPOSE_t
> TransB, double alpha, const gsl_matrix * A, const gsl_matrix * B,
> double beta, gsl_matrix * C )
>
> Like that:
>
> \ BLAS                                      Wed Sep 1416:10:34 MDT
> 2005 \ constants
> 111 Constant CblasNoTrans
>
> libgsl gsl_blas_dgemm int int df int int df int (int/fp)
> gsl_blas_dgemm ( alpha beta int int *gsl_matrix *gsl_matrix
> *gsl_matrix -- n )
>
> : ]]* (  *gsl_matrix *gsl_matrix -- *gsl_matrix )
>
>     !1 !0 CblasNoTrans CblasNoTrans 2swap 2dup
>     gsl_matrix size2 @ swap gsl_matrix size1 @ swap
>     gsl_matrix_alloc
>     gsl_blas_dgemm drop ;
>
>
> I get Bus error ! ]]* when trying to use ]]*
>
> Why?

No idea, everything looks correct on the first sight. Try insert some ~~ 
watchpoints to see if there are the right parameters on the stack as 
expected. And double-check if the size of the target matrix really is 
sufficient for the matrix product. I think it is all correct, but I 
could make the same error as you.

-- 
Bernd Paysan
"If you want it done right, you have to do it yourself"
http://www.jwdt.com/~paysan/

Attachment: pgpkQuPSqKPfQ.pgp
Description: PGP signature

Reply via email to