@@ -206,7 +206,7 @@ void ztranspose(blasint rows, blasint cols, double *alpha, double *a_src, int ld
206206 * param lda_dst - leading dimension of output matrix A
207207 * param conj specifies conjugation
208208 */
209- void scopy (blasint rows , blasint cols , float alpha , float * a_src , int lda_src ,
209+ void my_scopy (blasint rows , blasint cols , float alpha , float * a_src , int lda_src ,
210210 float * a_dst , blasint lda_dst )
211211{
212212 blasint i , j ;
@@ -217,7 +217,7 @@ void scopy(blasint rows, blasint cols, float alpha, float *a_src, int lda_src,
217217 }
218218}
219219
220- void dcopy (blasint rows , blasint cols , double alpha , double * a_src , int lda_src ,
220+ void my_dcopy (blasint rows , blasint cols , double alpha , double * a_src , int lda_src ,
221221 double * a_dst , blasint lda_dst )
222222{
223223 blasint i , j ;
@@ -228,7 +228,7 @@ void dcopy(blasint rows, blasint cols, double alpha, double *a_src, int lda_src,
228228 }
229229}
230230
231- void ccopy (blasint rows , blasint cols , float * alpha , float * a_src , int lda_src ,
231+ void my_ccopy (blasint rows , blasint cols , float * alpha , float * a_src , int lda_src ,
232232 float * a_dst , blasint lda_dst , int conj )
233233{
234234 blasint i , j ;
@@ -243,7 +243,7 @@ void ccopy(blasint rows, blasint cols, float *alpha, float *a_src, int lda_src,
243243 }
244244}
245245
246- void zcopy (blasint rows , blasint cols , double * alpha , double * a_src , int lda_src ,
246+ void my_zcopy (blasint rows , blasint cols , double * alpha , double * a_src , int lda_src ,
247247 double * a_dst , blasint lda_dst , int conj )
248248{
249249 blasint i , j ;
0 commit comments