|
|
|
@@ -36,6 +36,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
|
|
|
|
CTEST( zdotu,zdotu_n_1) |
|
|
|
{ |
|
|
|
#ifndef RETURN_BY_STACK |
|
|
|
blasint N=1,incX=1,incY=1; |
|
|
|
double x1[]={1.0,1.0}; |
|
|
|
double y1[]={1.0,2.0}; |
|
|
|
@@ -78,4 +79,6 @@ CTEST(zdotu, zdotu_offset_1) |
|
|
|
ASSERT_DBL_NEAR_TOL(creal(result1), creal(result2), DOUBLE_EPS); |
|
|
|
ASSERT_DBL_NEAR_TOL(cimag(result1), cimag(result2), DOUBLE_EPS); |
|
|
|
#endif |
|
|
|
|
|
|
|
#endif |
|
|
|
} |