Mercurial > hg > qm-dsp
comparison ext/cblas/include/cblas_f77.h @ 206:335be766a54d
Fix erroneous header guard
author | Chris Cannam |
---|---|
date | Fri, 30 Sep 2016 19:04:06 +0100 |
parents | 45330e0d2819 |
children |
comparison
equal
deleted
inserted
replaced
205:e81375fa6a33 | 206:335be766a54d |
---|---|
5 * Updated by Jeff Horner | 5 * Updated by Jeff Horner |
6 * Merged cblas_f77.h and cblas_fortran_header.h | 6 * Merged cblas_f77.h and cblas_fortran_header.h |
7 */ | 7 */ |
8 | 8 |
9 #ifndef CBLAS_F77_H | 9 #ifndef CBLAS_F77_H |
10 #define CBLAS_f77_H | 10 #define CBLAS_F77_H |
11 | 11 |
12 #ifdef CRAY | 12 #ifdef CRAY |
13 #include <fortran.h> | 13 #include <fortran.h> |
14 #define F77_CHAR _fcd | 14 #define F77_CHAR _fcd |
15 #define C2F_CHAR(a) ( _cptofcd( (a), 1 ) ) | 15 #define C2F_CHAR(a) ( _cptofcd( (a), 1 ) ) |