Function assignKargs

src/library/blas/gens/trmv_reg.cpp:404–455

(__global %TYPE const* restrict A, __global %TYPE * _xnew, __global %TYPE const* restrict _x_vector, uint N, int incx, int isUnity, uint lda, int doConj, uint offa, uint offx) */

		int incx, int isUnity, uint lda, int doConj, uint offa, uint offx)
*/
static void
assignKargs(KernelArg *args, const void *params, const void* )
{
    CLBlasKargs *blasArgs = (CLBlasKargs*)params;

	//NOTE: This will not work if SolutionStep->args is not passed in const void *params.
	SolutionStep *step = container_of(blasArgs, args, SolutionStep);

	cl_int inc;
	cl_int unity, doConj;
    //bool incxOne = (blasArgs->ldb.vector == 1);
    //bool incyOne = (blasArgs->ldc.vector == 1);

    INIT_KARG(&args[0], blasArgs->A); 	//A - input matrix - argument
    if( (step->funcID == CLBLAS_HEMV) || (blasArgs->pigFuncID == CLBLAS_HPMV) || (blasArgs->pigFuncID == CLBLAS_SPMV) )
	{
		INIT_KARG(&args[1], blasArgs->C);   //y - since the 2nd argument is the result buffer, we should send y for HEMV
        INIT_KARG(&args[2], blasArgs->B);   //x - actual x vector argument
	}
	else
	{
		INIT_KARG(&args[1], blasArgs->B); 	//x - result buffer = _xnew argument
    	INIT_KARG(&args[2], blasArgs->C); 	//y - scratch == _x_vector argument
    }
	initSizeKarg(&args[3], blasArgs->N);
    inc = blasArgs->ldb.Vector;
    INIT_KARG(&args[4], inc);
	unity = (blasArgs->diag == clblasUnit);
   	INIT_KARG(&args[5], unity);
    initSizeKarg(&args[6], blasArgs->lda.matrix);
	doConj = (blasArgs->transA == clblasConjTrans);

	#ifdef DEBUG_TRMV
	printf("doConj is : %d, unity is : %d, incx is : %d\n", doConj, unity, inc);
	#endif

   	INIT_KARG(&args[7], doConj);
	initSizeKarg(&args[8], blasArgs->offa);
	initSizeKarg(&args[9], blasArgs->offBX);

	// For HEMV both alpha and beta has to be passed.
	if( (step->funcID == CLBLAS_HEMV) || (blasArgs->pigFuncID == CLBLAS_HPMV) || (blasArgs->pigFuncID == CLBLAS_SPMV) )
	{
		inc = blasArgs->ldc.Vector;
		INIT_KARG(&args[10], inc);
		initSizeKarg(&args[11], blasArgs->offCY);
		assignScalarKarg(&args[12], &(blasArgs->alpha), blasArgs->dtype);
		assignScalarKarg(&args[13], &(blasArgs->beta), blasArgs->dtype);
	}

	return;
}

static bool
isFitToLDS(