mirror of https://gitlab.com/QEF/q-e.git
Cleanup of obsolete stuff in include/ - please note what is marked OBSOLESCENT
git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@12424 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
parent
b2a880c2d1
commit
d04b5c0c8a
|
@ -13,20 +13,9 @@ or http://www.gnu.org/copyleft/gpl.txt .
|
|||
/* fortran-to-C naming convention, for functions with and without
|
||||
underscores in the name (some compilers treat them differently) */
|
||||
|
||||
#if defined(__CRAY)
|
||||
/* AC_F77_WRAPPERS seems bugged if CRAY compilers are used. Since
|
||||
--disable-wrappers is necessary, here a workaround... */
|
||||
|
||||
#define F77_FUNC(name,NAME) name ## _
|
||||
#define F77_FUNC_(name,NAME) name ## _
|
||||
|
||||
#else
|
||||
|
||||
#undef F77_FUNC
|
||||
#undef F77_FUNC_
|
||||
|
||||
#endif
|
||||
|
||||
/* do we have the mallinfo structure (see clib/memstat.c) ? */
|
||||
|
||||
#undef HAVE_MALLINFO
|
||||
|
|
|
@ -8,7 +8,7 @@ are automatically generated by "configure".
|
|||
* include/configure.h
|
||||
==================
|
||||
automatically generated by configure using include/configure.h.in
|
||||
as template - contains compilation info, for future usage
|
||||
as template - contains compilation info, used in initial printout
|
||||
|
||||
* include/fft_defs.h
|
||||
==================
|
||||
|
@ -18,7 +18,7 @@ are automatically generated by "configure".
|
|||
C_POINTER is integer*8 for 64-bit machines,
|
||||
integer*4 on most other machines
|
||||
DO NOT add C-style comments! some fortran compilers do not like them
|
||||
OBSOLESCENT: should be replaced by ISO C binding definitions
|
||||
OBSOLESCENT: to be replaced by ISO C binding definitions
|
||||
|
||||
* include/c_defs.h
|
||||
================
|
||||
|
@ -34,27 +34,8 @@ are automatically generated by "configure".
|
|||
F77_FUNC('name','NAME')
|
||||
if 'name' does not contain an underscore; if it does, as
|
||||
F77_FUNC_('name','NAME')
|
||||
OBSOLESCENT: to be replaced by ISO C binding definitions
|
||||
|
||||
Absoft: convert to capital, no added underscores
|
||||
#define F77_FUNC(name,NAME) NAME
|
||||
#define F77_FUNC_(name,NAME) NAME
|
||||
XLF, HP-UX: convert to lowercase, no added underscores
|
||||
#define F77_FUNC(name,NAME) name
|
||||
#define F77_FUNC_(name,NAME) name
|
||||
G95, EKOPath, Alpha Linux: convert to lowercase, add one underscore
|
||||
if the name does not contain underscores, add two if it does
|
||||
#define F77_FUNC(name,NAME) name ## _
|
||||
#define F77_FUNC_(name,NAME) name ## __
|
||||
Most other cases: convert to lowercase, add one underscore
|
||||
#define F77_FUNC(name,NAME) name ## _
|
||||
#define F77_FUNC_(name,NAME) name ## _
|
||||
OBSOLESCENT: should be replaced by ISO C binding definitions
|
||||
|
||||
* include/f_defs.h
|
||||
================
|
||||
|
||||
OBSOLETE - DO NOT USE ANY LONGER
|
||||
|
||||
* iotk/include/iotk_config.h
|
||||
=========================
|
||||
contains definitions for iotk . Defines on output:
|
||||
|
|
|
@ -1,61 +0,0 @@
|
|||
!
|
||||
! Copyright (C) 2002-2006 Quantum ESPRESSO group
|
||||
! This file is distributed under the terms of the
|
||||
! GNU General Public License. See the file `License'
|
||||
! in the root directory of the present distribution,
|
||||
! or http://www.gnu.org/copyleft/gpl.txt .
|
||||
!
|
||||
# define DREAL @@_use_DBLE_instead@@
|
||||
# define DIMAG @@_use_AIMAG_instead@@
|
||||
# define DCMPLX @@_use_CMPLX_instead@@
|
||||
# define DFLOAT @@_use_DBLE_instead@@
|
||||
# define CMPLX(a,b) cmplx(a,b,kind=DP)
|
||||
|
||||
#if defined(ADD_BLAS_TWO_UNDERSCORES)
|
||||
# define C_NAME(name) name ## __
|
||||
#elif defined(ADD_BLAS_ONE_UNDERSCORE)
|
||||
# define C_NAME(name) name ## _
|
||||
#else
|
||||
# define C_NAME(name) name
|
||||
#endif
|
||||
|
||||
#define DAXPY C_NAME(daxpy)
|
||||
#define DCOPY C_NAME(dcopy)
|
||||
#define DDOT C_NAME(ddot)
|
||||
#define DGETRF C_NAME(dgetrf)
|
||||
#define DGETRI C_NAME(dgetri)
|
||||
#define DGEMV C_NAME(dgemv)
|
||||
#define DGEMM C_NAME(dgemm)
|
||||
#define DGER C_NAME(dger)
|
||||
#define DNRM2 C_NAME(dnrm2)
|
||||
#define DPOTRF C_NAME(dpotrf)
|
||||
#define DPOTRS C_NAME(dpotrs)
|
||||
#define DSCAL C_NAME(dscal)
|
||||
#define DSPEV C_NAME(dspev)
|
||||
#define DSYTRF C_NAME(dsytrf)
|
||||
#define DSYTRI C_NAME(dsytri)
|
||||
#define DSYEV C_NAME(dsyev)
|
||||
#define DSYGV C_NAME(dsygv)
|
||||
#define DSYGVX C_NAME(dsygvx)
|
||||
#define DSWAP C_NAME(dswap)
|
||||
#define ILAENV C_NAME(ilaenv)
|
||||
#define IDAMAX C_NAME(idamax)
|
||||
#define IZAMAX C_NAME(izamax)
|
||||
#define ZAXPY C_NAME(zaxpy)
|
||||
#define ZCOPY C_NAME(zcopy)
|
||||
#define ZDOTC C_NAME(zdotc)
|
||||
#define ZDOTU C_NAME(zdotu)
|
||||
#define ZGEMM C_NAME(zgemm)
|
||||
#define ZGEMV C_NAME(zgemv)
|
||||
#define ZGESV C_NAME(zgesv)
|
||||
#define ZGESVD C_NAME(zgesvd)
|
||||
#define ZGGEV C_NAME(zggev)
|
||||
#define ZHEEV C_NAME(zheev)
|
||||
#define ZHEEVX C_NAME(zheevx)
|
||||
#define ZHEGV C_NAME(zhegv)
|
||||
#define ZHEGVX C_NAME(zhegvx)
|
||||
#define ZHPEV C_NAME(zhpev)
|
||||
#define ZSCAL C_NAME(zscal)
|
||||
#define ZSWAP C_NAME(zswap)
|
||||
#define ZDSCAL C_NAME(zdscal)
|
||||
|
Loading…
Reference in New Issue