LINEAR++ library: AFF to LAPACK
arch.h
Go to the documentation of this file.
1 // LAPACK++ (V. 1.1)
2 // (C) 1992-1996 All Rights Reserved.
3 // Copyright (c) 1992 by J. J. Dongarra, E. Greaser, R. Pozo, D. Walker
4 // see file README.lapack++
5 
6 
7 // Linkage names between C, C++, and Fortran (platform dependent)
8 
9 #ifndef _ARCH_H_
10 #define _ARCH_H_
11 
12 
13 #if defined(RIOS) && !defined(CLAPACK)
14 #define F77NAME(x) x
15 #else
16 #include <generic.h>
17 #define F77NAME(x) name2(x,_)
18 #endif
19 
20 #if defined(SGI) && !defined(SGI_DEC)
21 #define SGI_DEC
22 
23 extern "C" {
24  void mkidxname() {}
25  void mkdatname() {}
26 }
27 #endif
28 
29 #endif // _ARCH_H_