Mercurial > hg > qm-dsp

comparison ext/cblas/include/cblas_f77.h @ 431:c49dbfac4349

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix erroneous header guard
author Chris Cannam <c.cannam@qmul.ac.uk>
date Fri, 30 Sep 2016 19:04:06 +0100
parents 905e45637745
children
comparison
equal deleted inserted replaced
430:335af74a25b6 431:c49dbfac4349
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 ) )