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 ) )