libflame revision_anchor
Functions
bli_copy.c File Reference

(r)

Functions

void bli_scopy (int m, float *x, int incx, float *y, int incy)
void bli_dcopy (int m, double *x, int incx, double *y, int incy)
void bli_ccopy (int m, scomplex *x, int incx, scomplex *y, int incy)
void bli_zcopy (int m, dcomplex *x, int incx, dcomplex *y, int incy)

Function Documentation

void bli_ccopy ( int  m,
scomplex x,
int  incx,
scomplex y,
int  incy 
)

References cblas_ccopy(), and F77_ccopy().

Referenced by bli_ccopymr(), bli_ccopymt(), bli_ccopyv(), and FLA_SA_LU_unb().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_ccopy( m,
                 x, incx, 
                 y, incy );
#else
    F77_ccopy( &m,
               x, &incx, 
               y, &incy );
#endif
}
void bli_dcopy ( int  m,
double *  x,
int  incx,
double *  y,
int  incy 
)

References cblas_dcopy(), and F77_dcopy().

Referenced by bli_dcopymr(), bli_dcopymt(), bli_dcopyv(), and FLA_SA_LU_unb().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_dcopy( m,
                 x, incx, 
                 y, incy );
#else
    F77_dcopy( &m,
               x, &incx, 
               y, &incy );
#endif
}
void bli_scopy ( int  m,
float *  x,
int  incx,
float *  y,
int  incy 
)

References cblas_scopy(), and F77_scopy().

Referenced by bli_scopymr(), bli_scopymt(), bli_scopyv(), and FLA_SA_LU_unb().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_scopy( m,
                 x, incx, 
                 y, incy );
#else
    F77_scopy( &m,
               x, &incx, 
               y, &incy );
#endif
}
void bli_zcopy ( int  m,
dcomplex x,
int  incx,
dcomplex y,
int  incy 
)

References cblas_zcopy(), and F77_zcopy().

Referenced by bli_zcopymr(), bli_zcopymt(), bli_zcopyv(), and FLA_SA_LU_unb().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_zcopy( m,
                 x, incx, 
                 y, incy );
#else
    F77_zcopy( &m,
               x, &incx, 
               y, &incy );
#endif
}