gaspersic/triton
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

C: More clBLAS tests

Browse Source
This commit is contained in:
Philippe
2015-06-27 11:44:50 -04:00
parent e6cecc5a09
commit 4cce9d3efd
8 changed files with 122 additions and 58 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
lib/symbolic/execute.cpp
View File

@@ -28,7 +28,7 @@ namespace isaac
{
//BLAS1 Helpers
#define HANDLE_VECTOR_AXPY(tmp) case OPERATOR_BINARY_TYPE_FAMILY\
#define HANDLE_VECTOR_AXPY(tmp) case OPERATOR_BINARY_TYPE_FAMILY:\
case OPERATOR_UNARY_TYPE_FAMILY: return make_pair(tmp, VECTOR_AXPY_TYPE)
#define HANDLE_VECTOR_REDUCTION(tmp) case OPERATOR_VECTOR_REDUCTION_TYPE_FAMILY: return make_pair(tmp, REDUCTION_TYPE)
#define HANDLE_MATRIX_AXPY(tmp) case OPERATOR_BINARY_TYPE_FAMILY:\
@@ -75,6 +75,19 @@ namespace isaac
}
break;
case COL_WISE_REDUCTION_TYPE:
case ROW_WISE_REDUCTION_TYPE:
switch(op.type_family){
case OPERATOR_BINARY_TYPE_FAMILY:
case OPERATOR_UNARY_TYPE_FAMILY: return std::make_pair(false, current_type);
HANDLE_ROWS_REDUCTION(true);
HANDLE_COLUMNS_REDUCTION(true);
HANDLE_VECTOR_REDUCTION(true);
HANDLE_MATRIX_PRODUCT(true);
default: break;
}
break;
// Inside a MATRIX AXPY
// - MATRIX PRODUCTS are temporaries
// - REDUCTIONS are temporaries
@@ -132,6 +145,7 @@ namespace isaac
final_type = next_type;
parse(array, node.lhs.node_index, next_type, breakpoints, final_type, false);
}
current_type = final_type;
if (node.rhs.type_family == COMPOSITE_OPERATOR_FAMILY)
{
std::pair<bool, expression_type> breakpoint = is_breakpoint(current_type, array[node.rhs.node_index].op, is_first);