@@ -103,6 +103,8 @@ bool compare_result(float *expect, float *result, std::vector<int> indices) {
103
103
104
104
bool test_passed = true ;
105
105
106
+ const bool run_complex_datatype = false ;
107
+
106
108
void test_cusparseSetGetStream () {
107
109
cusparseHandle_t handle;
108
110
cusparseCreate (&handle);
@@ -179,8 +181,10 @@ void test_cusparseTcsrmv_ge() {
179
181
180
182
cusparseScsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 5 , 9 , (float *)alpha_s.d_data , descrA, (float *)a_s_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (float *)b_s.d_data , (float *)beta_s.d_data , (float *)c_s.d_data );
181
183
cusparseDcsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 5 , 9 , (double *)alpha_d.d_data , descrA, (double *)a_d_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (double *)b_d.d_data , (double *)beta_d.d_data , (double *)c_d.d_data );
182
- // cusparseCcsrmv(handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4, 5, 9, (float2 *)alpha_c.d_data, descrA, (float2 *)a_c_val.d_data, (int *)a_row_ptr.d_data, (int *)a_col_ind.d_data, (float2 *)b_c.d_data, (float2 *)beta_c.d_data, (float2 *)c_c.d_data);
183
- // cusparseZcsrmv(handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4, 5, 9, (double2 *)alpha_z.d_data, descrA, (double2 *)a_z_val.d_data, (int *)a_row_ptr.d_data, (int *)a_col_ind.d_data, (double2 *)b_z.d_data, (double2 *)beta_z.d_data, (double2 *)c_z.d_data);
184
+ if (run_complex_datatype) {
185
+ cusparseCcsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 5 , 9 , (float2 *)alpha_c.d_data , descrA, (float2 *)a_c_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (float2 *)b_c.d_data , (float2 *)beta_c.d_data , (float2 *)c_c.d_data );
186
+ cusparseZcsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 5 , 9 , (double2 *)alpha_z.d_data , descrA, (double2 *)a_z_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (double2 *)b_z.d_data , (double2 *)beta_z.d_data , (double2 *)c_z.d_data );
187
+ }
184
188
185
189
c_s.D2H ();
186
190
c_d.D2H ();
@@ -274,8 +278,10 @@ void test_cusparseTcsrmv_sy() {
274
278
275
279
cusparseScsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 4 , 10 , (float *)alpha_s.d_data , descrA, (float *)a_s_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (float *)b_s.d_data , (float *)beta_s.d_data , (float *)c_s.d_data );
276
280
cusparseDcsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 4 , 10 , (double *)alpha_d.d_data , descrA, (double *)a_d_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (double *)b_d.d_data , (double *)beta_d.d_data , (double *)c_d.d_data );
277
- // cusparseCcsrmv(handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4, 4, 10, (float2 *)alpha_c.d_data, descrA, (float2 *)a_c_val.d_data, (int *)a_row_ptr.d_data, (int *)a_col_ind.d_data, (float2 *)b_c.d_data, (float2 *)beta_c.d_data, (float2 *)c_c.d_data);
278
- // cusparseZcsrmv(handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4, 4, 10, (double2 *)alpha_z.d_data, descrA, (double2 *)a_z_val.d_data, (int *)a_row_ptr.d_data, (int *)a_col_ind.d_data, (double2 *)b_z.d_data, (double2 *)beta_z.d_data, (double2 *)c_z.d_data);
281
+ if (run_complex_datatype) {
282
+ cusparseCcsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 4 , 10 , (float2 *)alpha_c.d_data , descrA, (float2 *)a_c_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (float2 *)b_c.d_data , (float2 *)beta_c.d_data , (float2 *)c_c.d_data );
283
+ cusparseZcsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 4 , 10 , (double2 *)alpha_z.d_data , descrA, (double2 *)a_z_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (double2 *)b_z.d_data , (double2 *)beta_z.d_data , (double2 *)c_z.d_data );
284
+ }
279
285
280
286
c_s.D2H ();
281
287
c_d.D2H ();
@@ -371,8 +377,10 @@ void test_cusparseTcsrmv_tr() {
371
377
372
378
cusparseScsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 4 , 7 , (float *)alpha_s.d_data , descrA, (float *)a_s_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (float *)b_s.d_data , (float *)beta_s.d_data , (float *)c_s.d_data );
373
379
cusparseDcsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 4 , 7 , (double *)alpha_d.d_data , descrA, (double *)a_d_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (double *)b_d.d_data , (double *)beta_d.d_data , (double *)c_d.d_data );
374
- // cusparseCcsrmv(handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4, 4, 7, (float2 *)alpha_c.d_data, descrA, (float2 *)a_c_val.d_data, (int *)a_row_ptr.d_data, (int *)a_col_ind.d_data, (float2 *)b_c.d_data, (float2 *)beta_c.d_data, (float2 *)c_c.d_data);
375
- // cusparseZcsrmv(handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4, 4, 7, (double2 *)alpha_z.d_data, descrA, (double2 *)a_z_val.d_data, (int *)a_row_ptr.d_data, (int *)a_col_ind.d_data, (double2 *)b_z.d_data, (double2 *)beta_z.d_data, (double2 *)c_z.d_data);
380
+ if (run_complex_datatype) {
381
+ cusparseCcsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 4 , 7 , (float2 *)alpha_c.d_data , descrA, (float2 *)a_c_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (float2 *)b_c.d_data , (float2 *)beta_c.d_data , (float2 *)c_c.d_data );
382
+ cusparseZcsrmv (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 4 , 7 , (double2 *)alpha_z.d_data , descrA, (double2 *)a_z_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (double2 *)b_z.d_data , (double2 *)beta_z.d_data , (double2 *)c_z.d_data );
383
+ }
376
384
377
385
c_s.D2H ();
378
386
c_d.D2H ();
@@ -460,8 +468,10 @@ void test_cusparseTcsrmm() {
460
468
461
469
cusparseScsrmm (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 2 , 5 , 9 , (float *)alpha_s.d_data , descrA, (float *)a_s_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (float *)b_s.d_data , 5 , (float *)beta_s.d_data , (float *)c_s.d_data , 4 );
462
470
cusparseDcsrmm (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 2 , 5 , 9 , (double *)alpha_d.d_data , descrA, (double *)a_d_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (double *)b_d.d_data , 5 , (double *)beta_d.d_data , (double *)c_d.d_data , 4 );
463
- // cusparseCcsrmm(handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4, 2, 5, 9, (float2 *)alpha_c.d_data, descrA, (float2 *)a_c_val.d_data, (int *)a_row_ptr.d_data, (int *)a_col_ind.d_data, (float2 *)b_c.d_data, 5, (float2 *)beta_c.d_data, (float2 *)c_c.d_data, 4);
464
- // cusparseZcsrmm(handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4, 2, 5, 9, (double2 *)alpha_z.d_data, descrA, (double2 *)a_z_val.d_data, (int *)a_row_ptr.d_data, (int *)a_col_ind.d_data, (double2 *)b_z.d_data, 5, (double2 *)beta_z.d_data, (double2 *)c_z.d_data, 4);
471
+ if (run_complex_datatype) {
472
+ cusparseCcsrmm (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 2 , 5 , 9 , (float2 *)alpha_c.d_data , descrA, (float2 *)a_c_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (float2 *)b_c.d_data , 5 , (float2 *)beta_c.d_data , (float2 *)c_c.d_data , 4 );
473
+ cusparseZcsrmm (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 2 , 5 , 9 , (double2 *)alpha_z.d_data , descrA, (double2 *)a_z_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , (double2 *)b_z.d_data , 5 , (double2 *)beta_z.d_data , (double2 *)c_z.d_data , 4 );
474
+ }
465
475
466
476
c_s.D2H ();
467
477
c_d.D2H ();
@@ -514,8 +524,10 @@ void test_cusparseTcsrsv() {
514
524
515
525
cusparseScsrsv_analysis (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 9 , descrA, (float *)a_s_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , info);
516
526
cusparseDcsrsv_analysis (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 9 , descrA, (double *)a_d_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , info);
517
- // cusparseCcsrsv_analysis(handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4, 9, descrA, (float2 *)a_c_val.d_data, (int *)a_row_ptr.d_data, (int *)a_col_ind.d_data, info);
518
- // cusparseZcsrsv_analysis(handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4, 9, descrA, (double2 *)a_z_val.d_data, (int *)a_row_ptr.d_data, (int *)a_col_ind.d_data, info);
527
+ if (run_complex_datatype) {
528
+ cusparseCcsrsv_analysis (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 9 , descrA, (float2 *)a_c_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , info);
529
+ cusparseZcsrsv_analysis (handle, CUSPARSE_OPERATION_NON_TRANSPOSE, 4 , 9 , descrA, (double2 *)a_z_val.d_data , (int *)a_row_ptr.d_data , (int *)a_col_ind.d_data , info);
530
+ }
519
531
520
532
cudaStreamSynchronize (0 );
521
533
cusparseDestroySolveAnalysisInfo (info);
0 commit comments