Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
OpenDAS
dlib
Commits
0ef7198e
Commit
0ef7198e
authored
Mar 22, 2018
by
Davis King
Browse files
Added a CBLAS_INT_TYPE macro to control the int type used by cblas.
parent
e71f6bce
Changes
140
Show whitespace changes
Inline
Side-by-side
Showing
20 changed files
with
34 additions
and
34 deletions
+34
-34
dlib/external/cblas/cblas_dtpmv.c
dlib/external/cblas/cblas_dtpmv.c
+1
-1
dlib/external/cblas/cblas_dtpsv.c
dlib/external/cblas/cblas_dtpsv.c
+1
-1
dlib/external/cblas/cblas_dtrmm.c
dlib/external/cblas/cblas_dtrmm.c
+3
-3
dlib/external/cblas/cblas_dtrmv.c
dlib/external/cblas/cblas_dtrmv.c
+2
-2
dlib/external/cblas/cblas_dtrsm.c
dlib/external/cblas/cblas_dtrsm.c
+3
-3
dlib/external/cblas/cblas_dtrsv.c
dlib/external/cblas/cblas_dtrsv.c
+2
-2
dlib/external/cblas/cblas_dzasum.c
dlib/external/cblas/cblas_dzasum.c
+1
-1
dlib/external/cblas/cblas_dznrm2.c
dlib/external/cblas/cblas_dznrm2.c
+1
-1
dlib/external/cblas/cblas_icamax.c
dlib/external/cblas/cblas_icamax.c
+1
-1
dlib/external/cblas/cblas_idamax.c
dlib/external/cblas/cblas_idamax.c
+1
-1
dlib/external/cblas/cblas_isamax.c
dlib/external/cblas/cblas_isamax.c
+1
-1
dlib/external/cblas/cblas_izamax.c
dlib/external/cblas/cblas_izamax.c
+1
-1
dlib/external/cblas/cblas_sasum.c
dlib/external/cblas/cblas_sasum.c
+1
-1
dlib/external/cblas/cblas_saxpy.c
dlib/external/cblas/cblas_saxpy.c
+2
-2
dlib/external/cblas/cblas_scasum.c
dlib/external/cblas/cblas_scasum.c
+1
-1
dlib/external/cblas/cblas_scnrm2.c
dlib/external/cblas/cblas_scnrm2.c
+1
-1
dlib/external/cblas/cblas_scopy.c
dlib/external/cblas/cblas_scopy.c
+2
-2
dlib/external/cblas/cblas_sdot.c
dlib/external/cblas/cblas_sdot.c
+2
-2
dlib/external/cblas/cblas_sdsdot.c
dlib/external/cblas/cblas_sdsdot.c
+2
-2
dlib/external/cblas/cblas_sgbmv.c
dlib/external/cblas/cblas_sgbmv.c
+5
-5
No files found.
dlib/external/cblas/cblas_dtpmv.c
View file @
0ef7198e
...
@@ -9,7 +9,7 @@
...
@@ -9,7 +9,7 @@
#include "cblas_f77.h"
#include "cblas_f77.h"
void
cblas_dtpmv
(
const
enum
CBLAS_ORDER
order
,
const
enum
CBLAS_UPLO
Uplo
,
void
cblas_dtpmv
(
const
enum
CBLAS_ORDER
order
,
const
enum
CBLAS_UPLO
Uplo
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_DIAG
Diag
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_DIAG
Diag
,
const
int
N
,
const
double
*
Ap
,
double
*
X
,
const
int
incX
)
const
CBLAS_INT_TYPE
N
,
const
double
*
Ap
,
double
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
char
TA
;
char
TA
;
char
UL
;
char
UL
;
...
...
dlib/external/cblas/cblas_dtpsv.c
View file @
0ef7198e
...
@@ -9,7 +9,7 @@
...
@@ -9,7 +9,7 @@
#include "cblas_f77.h"
#include "cblas_f77.h"
void
cblas_dtpsv
(
const
enum
CBLAS_ORDER
order
,
const
enum
CBLAS_UPLO
Uplo
,
void
cblas_dtpsv
(
const
enum
CBLAS_ORDER
order
,
const
enum
CBLAS_UPLO
Uplo
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_DIAG
Diag
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_DIAG
Diag
,
const
int
N
,
const
double
*
Ap
,
double
*
X
,
const
int
incX
)
const
CBLAS_INT_TYPE
N
,
const
double
*
Ap
,
double
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
char
TA
;
char
TA
;
char
UL
;
char
UL
;
...
...
dlib/external/cblas/cblas_dtrmm.c
View file @
0ef7198e
...
@@ -11,9 +11,9 @@
...
@@ -11,9 +11,9 @@
#include "cblas_f77.h"
#include "cblas_f77.h"
void
cblas_dtrmm
(
const
enum
CBLAS_ORDER
Order
,
const
enum
CBLAS_SIDE
Side
,
void
cblas_dtrmm
(
const
enum
CBLAS_ORDER
Order
,
const
enum
CBLAS_SIDE
Side
,
const
enum
CBLAS_UPLO
Uplo
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_UPLO
Uplo
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_DIAG
Diag
,
const
int
M
,
const
int
N
,
const
enum
CBLAS_DIAG
Diag
,
const
CBLAS_INT_TYPE
M
,
const
CBLAS_INT_TYPE
N
,
const
double
alpha
,
const
double
*
A
,
const
int
lda
,
const
double
alpha
,
const
double
*
A
,
const
CBLAS_INT_TYPE
lda
,
double
*
B
,
const
int
ldb
)
double
*
B
,
const
CBLAS_INT_TYPE
ldb
)
{
{
char
UL
,
TA
,
SD
,
DI
;
char
UL
,
TA
,
SD
,
DI
;
#ifdef F77_CHAR
#ifdef F77_CHAR
...
...
dlib/external/cblas/cblas_dtrmv.c
View file @
0ef7198e
...
@@ -11,8 +11,8 @@
...
@@ -11,8 +11,8 @@
#include "cblas_f77.h"
#include "cblas_f77.h"
void
cblas_dtrmv
(
const
enum
CBLAS_ORDER
order
,
const
enum
CBLAS_UPLO
Uplo
,
void
cblas_dtrmv
(
const
enum
CBLAS_ORDER
order
,
const
enum
CBLAS_UPLO
Uplo
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_DIAG
Diag
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_DIAG
Diag
,
const
int
N
,
const
double
*
A
,
const
int
lda
,
const
CBLAS_INT_TYPE
N
,
const
double
*
A
,
const
CBLAS_INT_TYPE
lda
,
double
*
X
,
const
int
incX
)
double
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
char
TA
;
char
TA
;
...
...
dlib/external/cblas/cblas_dtrsm.c
View file @
0ef7198e
...
@@ -11,9 +11,9 @@
...
@@ -11,9 +11,9 @@
#include "cblas_f77.h"
#include "cblas_f77.h"
void
cblas_dtrsm
(
const
enum
CBLAS_ORDER
Order
,
const
enum
CBLAS_SIDE
Side
,
void
cblas_dtrsm
(
const
enum
CBLAS_ORDER
Order
,
const
enum
CBLAS_SIDE
Side
,
const
enum
CBLAS_UPLO
Uplo
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_UPLO
Uplo
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_DIAG
Diag
,
const
int
M
,
const
int
N
,
const
enum
CBLAS_DIAG
Diag
,
const
CBLAS_INT_TYPE
M
,
const
CBLAS_INT_TYPE
N
,
const
double
alpha
,
const
double
*
A
,
const
int
lda
,
const
double
alpha
,
const
double
*
A
,
const
CBLAS_INT_TYPE
lda
,
double
*
B
,
const
int
ldb
)
double
*
B
,
const
CBLAS_INT_TYPE
ldb
)
{
{
char
UL
,
TA
,
SD
,
DI
;
char
UL
,
TA
,
SD
,
DI
;
...
...
dlib/external/cblas/cblas_dtrsv.c
View file @
0ef7198e
...
@@ -9,8 +9,8 @@
...
@@ -9,8 +9,8 @@
#include "cblas_f77.h"
#include "cblas_f77.h"
void
cblas_dtrsv
(
const
enum
CBLAS_ORDER
order
,
const
enum
CBLAS_UPLO
Uplo
,
void
cblas_dtrsv
(
const
enum
CBLAS_ORDER
order
,
const
enum
CBLAS_UPLO
Uplo
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_DIAG
Diag
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
enum
CBLAS_DIAG
Diag
,
const
int
N
,
const
double
*
A
,
const
int
lda
,
double
*
X
,
const
CBLAS_INT_TYPE
N
,
const
double
*
A
,
const
CBLAS_INT_TYPE
lda
,
double
*
X
,
const
int
incX
)
const
CBLAS_INT_TYPE
incX
)
{
{
char
TA
;
char
TA
;
...
...
dlib/external/cblas/cblas_dzasum.c
View file @
0ef7198e
...
@@ -9,7 +9,7 @@
...
@@ -9,7 +9,7 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
double
cblas_dzasum
(
const
int
N
,
const
void
*
X
,
const
int
incX
)
double
cblas_dzasum
(
const
CBLAS_INT_TYPE
N
,
const
void
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
double
asum
;
double
asum
;
#ifdef F77_INT
#ifdef F77_INT
...
...
dlib/external/cblas/cblas_dznrm2.c
View file @
0ef7198e
...
@@ -9,7 +9,7 @@
...
@@ -9,7 +9,7 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
double
cblas_dznrm2
(
const
int
N
,
const
void
*
X
,
const
int
incX
)
double
cblas_dznrm2
(
const
CBLAS_INT_TYPE
N
,
const
void
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
double
nrm2
;
double
nrm2
;
#ifdef F77_INT
#ifdef F77_INT
...
...
dlib/external/cblas/cblas_icamax.c
View file @
0ef7198e
...
@@ -9,7 +9,7 @@
...
@@ -9,7 +9,7 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
CBLAS_INDEX
cblas_icamax
(
const
int
N
,
const
void
*
X
,
const
int
incX
)
CBLAS_INDEX
cblas_icamax
(
const
CBLAS_INT_TYPE
N
,
const
void
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
F77_INT
iamax
;
F77_INT
iamax
;
#ifdef F77_INT
#ifdef F77_INT
...
...
dlib/external/cblas/cblas_idamax.c
View file @
0ef7198e
...
@@ -9,7 +9,7 @@
...
@@ -9,7 +9,7 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
CBLAS_INDEX
cblas_idamax
(
const
int
N
,
const
double
*
X
,
const
int
incX
)
CBLAS_INDEX
cblas_idamax
(
const
CBLAS_INT_TYPE
N
,
const
double
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
F77_INT
iamax
;
F77_INT
iamax
;
#ifdef F77_INT
#ifdef F77_INT
...
...
dlib/external/cblas/cblas_isamax.c
View file @
0ef7198e
...
@@ -9,7 +9,7 @@
...
@@ -9,7 +9,7 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
CBLAS_INDEX
cblas_isamax
(
const
int
N
,
const
float
*
X
,
const
int
incX
)
CBLAS_INDEX
cblas_isamax
(
const
CBLAS_INT_TYPE
N
,
const
float
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
F77_INT
iamax
;
F77_INT
iamax
;
#ifdef F77_INT
#ifdef F77_INT
...
...
dlib/external/cblas/cblas_izamax.c
View file @
0ef7198e
...
@@ -9,7 +9,7 @@
...
@@ -9,7 +9,7 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
CBLAS_INDEX
cblas_izamax
(
const
int
N
,
const
void
*
X
,
const
int
incX
)
CBLAS_INDEX
cblas_izamax
(
const
CBLAS_INT_TYPE
N
,
const
void
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
F77_INT
iamax
;
F77_INT
iamax
;
#ifdef F77_INT
#ifdef F77_INT
...
...
dlib/external/cblas/cblas_sasum.c
View file @
0ef7198e
...
@@ -9,7 +9,7 @@
...
@@ -9,7 +9,7 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
float
cblas_sasum
(
const
int
N
,
const
float
*
X
,
const
int
incX
)
float
cblas_sasum
(
const
CBLAS_INT_TYPE
N
,
const
float
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
float
asum
;
float
asum
;
#ifdef F77_INT
#ifdef F77_INT
...
...
dlib/external/cblas/cblas_saxpy.c
View file @
0ef7198e
...
@@ -9,8 +9,8 @@
...
@@ -9,8 +9,8 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
void
cblas_saxpy
(
const
int
N
,
const
float
alpha
,
const
float
*
X
,
void
cblas_saxpy
(
const
CBLAS_INT_TYPE
N
,
const
float
alpha
,
const
float
*
X
,
const
int
incX
,
float
*
Y
,
const
int
incY
)
const
CBLAS_INT_TYPE
incX
,
float
*
Y
,
const
CBLAS_INT_TYPE
incY
)
{
{
#ifdef F77_INT
#ifdef F77_INT
F77_INT
F77_N
=
N
,
F77_incX
=
incX
,
F77_incY
=
incY
;
F77_INT
F77_N
=
N
,
F77_incX
=
incX
,
F77_incY
=
incY
;
...
...
dlib/external/cblas/cblas_scasum.c
View file @
0ef7198e
...
@@ -9,7 +9,7 @@
...
@@ -9,7 +9,7 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
float
cblas_scasum
(
const
int
N
,
const
void
*
X
,
const
int
incX
)
float
cblas_scasum
(
const
CBLAS_INT_TYPE
N
,
const
void
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
float
asum
;
float
asum
;
#ifdef F77_INT
#ifdef F77_INT
...
...
dlib/external/cblas/cblas_scnrm2.c
View file @
0ef7198e
...
@@ -9,7 +9,7 @@
...
@@ -9,7 +9,7 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
float
cblas_scnrm2
(
const
int
N
,
const
void
*
X
,
const
int
incX
)
float
cblas_scnrm2
(
const
CBLAS_INT_TYPE
N
,
const
void
*
X
,
const
CBLAS_INT_TYPE
incX
)
{
{
float
nrm2
;
float
nrm2
;
#ifdef F77_INT
#ifdef F77_INT
...
...
dlib/external/cblas/cblas_scopy.c
View file @
0ef7198e
...
@@ -8,8 +8,8 @@
...
@@ -8,8 +8,8 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
void
cblas_scopy
(
const
int
N
,
const
float
*
X
,
void
cblas_scopy
(
const
CBLAS_INT_TYPE
N
,
const
float
*
X
,
const
int
incX
,
float
*
Y
,
const
int
incY
)
const
CBLAS_INT_TYPE
incX
,
float
*
Y
,
const
CBLAS_INT_TYPE
incY
)
{
{
#ifdef F77_INT
#ifdef F77_INT
F77_INT
F77_N
=
N
,
F77_incX
=
incX
,
F77_incY
=
incY
;
F77_INT
F77_N
=
N
,
F77_incX
=
incX
,
F77_incY
=
incY
;
...
...
dlib/external/cblas/cblas_sdot.c
View file @
0ef7198e
...
@@ -9,8 +9,8 @@
...
@@ -9,8 +9,8 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
float
cblas_sdot
(
const
int
N
,
const
float
*
X
,
float
cblas_sdot
(
const
CBLAS_INT_TYPE
N
,
const
float
*
X
,
const
int
incX
,
const
float
*
Y
,
const
int
incY
)
const
CBLAS_INT_TYPE
incX
,
const
float
*
Y
,
const
CBLAS_INT_TYPE
incY
)
{
{
float
dot
;
float
dot
;
#ifdef F77_INT
#ifdef F77_INT
...
...
dlib/external/cblas/cblas_sdsdot.c
View file @
0ef7198e
...
@@ -9,8 +9,8 @@
...
@@ -9,8 +9,8 @@
*/
*/
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
float
cblas_sdsdot
(
const
int
N
,
const
float
alpha
,
const
float
*
X
,
float
cblas_sdsdot
(
const
CBLAS_INT_TYPE
N
,
const
float
alpha
,
const
float
*
X
,
const
int
incX
,
const
float
*
Y
,
const
int
incY
)
const
CBLAS_INT_TYPE
incX
,
const
float
*
Y
,
const
CBLAS_INT_TYPE
incY
)
{
{
float
dot
;
float
dot
;
#ifdef F77_INT
#ifdef F77_INT
...
...
dlib/external/cblas/cblas_sgbmv.c
View file @
0ef7198e
...
@@ -10,11 +10,11 @@
...
@@ -10,11 +10,11 @@
#include "cblas.h"
#include "cblas.h"
#include "cblas_f77.h"
#include "cblas_f77.h"
void
cblas_sgbmv
(
const
enum
CBLAS_ORDER
order
,
void
cblas_sgbmv
(
const
enum
CBLAS_ORDER
order
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
int
M
,
const
int
N
,
const
enum
CBLAS_TRANSPOSE
TransA
,
const
CBLAS_INT_TYPE
M
,
const
CBLAS_INT_TYPE
N
,
const
int
KL
,
const
int
KU
,
const
CBLAS_INT_TYPE
KL
,
const
CBLAS_INT_TYPE
KU
,
const
float
alpha
,
const
float
*
A
,
const
int
lda
,
const
float
alpha
,
const
float
*
A
,
const
CBLAS_INT_TYPE
lda
,
const
float
*
X
,
const
int
incX
,
const
float
beta
,
const
float
*
X
,
const
CBLAS_INT_TYPE
incX
,
const
float
beta
,
float
*
Y
,
const
int
incY
)
float
*
Y
,
const
CBLAS_INT_TYPE
incY
)
{
{
char
TA
;
char
TA
;
#ifdef F77_CHAR
#ifdef F77_CHAR
...
...
Prev
1
2
3
4
5
6
7
Next
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment