File: cblas_mangling_with_flags.h.in

package info (click to toggle)
lapack 3.9.0-3%2Bdeb11u1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 74,592 kB
  • sloc: fortran: 593,288; ansic: 185,421; makefile: 4,884; sh: 318; python: 268
file content (17 lines) | stat: -rw-r--r-- 444 bytes parent folder | download | duplicates (7) 
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