Remove spurious tests for complex ASUM and NRM2
This commit is contained in:
parent
ec2948f147
commit
de139337b8
|
@ -21,16 +21,6 @@ void F77_saxpy(blasint *N, const float *alpha, OPENBLAS_CONST float *X,
|
|||
return;
|
||||
}
|
||||
|
||||
float F77_scasum(blasint *N, float *X, blasint *incX)
|
||||
{
|
||||
return cblas_scasum(*N, X, *incX);
|
||||
}
|
||||
|
||||
float F77_scnrm2(blasint *N, OPENBLAS_CONST float *X, blasint *incX)
|
||||
{
|
||||
return cblas_scnrm2(*N, X, *incX);
|
||||
}
|
||||
|
||||
void F77_scopy(blasint *N, OPENBLAS_CONST float *X, blasint *incX,
|
||||
float *Y, blasint *incY)
|
||||
{
|
||||
|
|
Loading…
Reference in New Issue