op_dat op_decl_dat ( op_set set, int dim, char const *type, int size, char * data, char const * name ) { op_dat dat = op_decl_dat_core ( set, dim, type, size, data, name ); op_cpHostToDevice ( ( void ** ) &( dat->data_d ), ( void ** ) &( dat->data ), dat->size * set->size ); return dat; }
op_dat op_decl_dat_char( op_set set, int dim, char const * type, int size, char * data, char const *name ) { if (set== NULL || data == NULL) return NULL; char* d = (char*) malloc((size_t)set->size*(size_t)dim*(size_t)size); if (d == NULL) { printf ( " op_decl_dat_char error -- error allocating memory to dat\n" ); exit ( -1 ); } memcpy(d, data, sizeof(char)*set->size*dim*size); op_dat out_dat = op_decl_dat_core ( set, dim, type, size, d, name ); out_dat-> user_managed = 0; return out_dat; }
op_dat op_decl_dat ( op_set set, int dim, char const * type, int size, char * data, char const *name ) { return op_decl_dat_core ( set, dim, type, size, data, name ); }