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?

Thank you!

--
Sergey

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to