File: cblas_mangling_with_flags.h.in

package info (click to toggle)
lapack 3.8.0-2
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 73,036 kB
  • sloc: fortran: 587,347; ansic: 179,104; makefile: 4,651; python: 269; sh: 197
file content (17 lines) | stat: -rw-r--r-- 444 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
#ifndef F77_HEADER_INCLUDED
#define F77_HEADER_INCLUDED

#ifndef F77_GLOBAL
#if defined(F77_GLOBAL_PATTERN_LC) || defined(ADD_)
#define F77_GLOBAL(lcname,UCNAME)  lcname##_
#elif defined(F77_GLOBAL_PATTERN_UC) || defined(UPPER)
#define F77_GLOBAL(lcname,UCNAME)  UCNAME
#elif defined(F77_GLOBAL_PATTERN_MC) || defined(NOCHANGE)
#define F77_GLOBAL(lcname,UCNAME)  lcname
#else
#define F77_GLOBAL(lcname,UCNAME)  lcname##_
#endif
#endif

#endif