blob: 29027b96ccc027f363e753efef70f2eeffc65dad (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
|
--- nist_spblas.cc.orig 2012-01-05 12:33:16.000000000 -0500
+++ nist_spblas.cc 2012-01-05 12:37:11.000000000 -0500
@@ -54,7 +54,17 @@
#define ERROR_RETURN(ret_val) return ret_val
#endif
+/* dummy routines for real version of usdot to compile. */
+
+inline const double& conj(const double &x)
+{
+ return x;
+}
+inline const float& conj(const float &x)
+{
+ return x;
+}
using namespace std;
@@ -1274,19 +1284,6 @@
/* Level 1 generic routines */
/* --------------------------- */
-/* dummy routines for real version of usdot to compile. */
-
-inline const double& conj(const double &x)
-{
- return x;
-}
-
-inline const float& conj(const float &x)
-{
- return x;
-}
-
-
template <class T>
void BLAS_xusdot( enum blas_conj_type conj_flag, int nz,
const T *x, const int *index, const T *y, int incy,
|