OSchip
/
OpenBLAS
Not watched
1
0
Fork 0
Code
Releases 66 Wiki evaluate Activity
Issues 0 Pull Requests 0 Datasets Model Cloudbrain HPC
Browse Source

fix function typecasts

tags/v0.3.20
Martin Kroeker GitHub 4 years ago
parent
07fe5b19a4
commit
d1ee6ff73f
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
6 changed files with 6 additions and 6 deletions
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. +1
    -1
      kernel/x86_64/dasum.c
  2. +1
    -1
      kernel/x86_64/ddot.c
  3. +1
    -1
      kernel/x86_64/drot.c
  4. +1
    -1
      kernel/x86_64/sasum.c
  5. +1
    -1
      kernel/x86_64/srot.c
  6. +1
    -1
      kernel/x86_64/zdot.c

+ 1
- 1
kernel/x86_64/dasum.c View File

@@ -114,7 +114,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x)
#else #else
mode = BLAS_DOUBLE | BLAS_REAL; mode = BLAS_DOUBLE | BLAS_REAL;
#endif #endif
blas_level1_thread_with_return_value(mode, n, 0, 0, &dummy_alpha, x, inc_x, NULL, 0, result, 0, (void *)asum_thread_function, nthreads);
blas_level1_thread_with_return_value(mode, n, 0, 0, &dummy_alpha, x, inc_x, NULL, 0, result, 0, (int (*)(void))asum_thread_function, nthreads);
ptr = (FLOAT *)result; ptr = (FLOAT *)result;
for (i = 0; i < nthreads; i++) { for (i = 0; i < nthreads; i++) {
sumf += (*ptr); sumf += (*ptr);


+ 1
- 1
kernel/x86_64/ddot.c View File

@@ -190,7 +190,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x, FLOAT *y, BLASLONG inc_y)
#endif #endif
blas_level1_thread_with_return_value(mode, n, 0, 0, &dummy_alpha, blas_level1_thread_with_return_value(mode, n, 0, 0, &dummy_alpha,
x, inc_x, y, inc_y, result, 0, x, inc_x, y, inc_y, result, 0,
( void *)dot_thread_function, nthreads);
(int (*)(void)) dot_thread_function, nthreads);


ptr = (RETURN_TYPE *)result; ptr = (RETURN_TYPE *)result;
for (i = 0; i < nthreads; i++) { for (i = 0; i < nthreads; i++) {


+ 1
- 1
kernel/x86_64/drot.c View File

@@ -196,7 +196,7 @@ int CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x, FLOAT *y, BLASLONG inc_y, FLOAT
#else #else
int mode = BLAS_SINGLE | BLAS_REAL | BLAS_PTHREAD; int mode = BLAS_SINGLE | BLAS_REAL | BLAS_PTHREAD;
#endif #endif
blas_level1_thread(mode, n, 0, 0, alpha, x, inc_x, y, inc_y, &dummy_c, 0, (void *)rot_thread_function, nthreads);
blas_level1_thread(mode, n, 0, 0, alpha, x, inc_x, y, inc_y, &dummy_c, 0, (int (*)(void))rot_thread_function, nthreads);
} }
#else #else
rot_compute(n, x, inc_x, y, inc_y, c, s); rot_compute(n, x, inc_x, y, inc_y, c, s);


+ 1
- 1
kernel/x86_64/sasum.c View File

@@ -123,7 +123,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x)
#else #else
mode = BLAS_DOUBLE | BLAS_REAL; mode = BLAS_DOUBLE | BLAS_REAL;
#endif #endif
blas_level1_thread_with_return_value(mode, n, 0, 0, &dummy_alpha, x, inc_x, NULL, 0, result, 0, (void *)asum_thread_function, nthreads);
blas_level1_thread_with_return_value(mode, n, 0, 0, &dummy_alpha, x, inc_x, NULL, 0, result, 0, (int (*)(void))asum_thread_function, nthreads);
ptr = (FLOAT *)result; ptr = (FLOAT *)result;
for (i = 0; i < nthreads; i++) { for (i = 0; i < nthreads; i++) {
sumf += (*ptr); sumf += (*ptr);


+ 1
- 1
kernel/x86_64/srot.c View File

@@ -198,7 +198,7 @@ int CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x, FLOAT *y, BLASLONG inc_y, FLOAT
#else #else
int mode = BLAS_SINGLE | BLAS_REAL | BLAS_PTHREAD; int mode = BLAS_SINGLE | BLAS_REAL | BLAS_PTHREAD;
#endif #endif
blas_level1_thread(mode, n, 0, 0, alpha, x, inc_x, y, inc_y, &dummy_c, 0, (void *)rot_thread_function, nthreads);
blas_level1_thread(mode, n, 0, 0, alpha, x, inc_x, y, inc_y, &dummy_c, 0, (int (*)(void))rot_thread_function, nthreads);
} }
#else #else
rot_compute(n, x, inc_x, y, inc_y, c, s); rot_compute(n, x, inc_x, y, inc_y, c, s);


+ 1
- 1
kernel/x86_64/zdot.c View File

@@ -215,7 +215,7 @@ OPENBLAS_COMPLEX_FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x, FLOAT *y, BLA


blas_level1_thread_with_return_value(mode, n, 0, 0, &dummy_alpha, blas_level1_thread_with_return_value(mode, n, 0, 0, &dummy_alpha,
x, inc_x, y, inc_y, result, 0, x, inc_x, y, inc_y, result, 0,
( void *)zdot_thread_function, nthreads);
(int (*)(void))zdot_thread_function, nthreads);


ptr = (OPENBLAS_COMPLEX_FLOAT *)result; ptr = (OPENBLAS_COMPLEX_FLOAT *)result;
for (i = 0; i < nthreads; i++) { for (i = 0; i < nthreads; i++) {


Write Preview
Loading…
Cancel
Save