mirror of
https://github.com/sfilippone/psblas3.git
synced 2026-10-15 18:39:10 +00:00
Michele Martone
7e4bcfd6e0
introduced a header file which defines default values for fortran symbols mangling. it shall be used by each C source file defining symbols intended to be used by fortran.
21 lines
396 B
C
21 lines
396 B
C
#ifndef PSB_INTERNALS_H
|
|
#define PSB_INTERNALS_H
|
|
|
|
/* providing a default mangling scheme */
|
|
#ifndef LowerUnderscore
|
|
#ifndef LowerDoubleUnderscore
|
|
#ifndef LowerCase
|
|
#ifndef UpperUnderscore
|
|
#ifndef UpperDoubleUnderscore
|
|
#ifndef UpperCase
|
|
#define LowerUnderscore 1 /* 20110404 the default */
|
|
/* #error "should specify a default mangling scheme" */
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#endif
|
|
|
|
#endif
|