psblas3:
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.psblas3-type-indexed
parent
96a9f7ffbc
commit
7e4bcfd6e0
@ -0,0 +1,20 @@
|
|||||||
|
#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
|
Loading…
Reference in New Issue