1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
/*============================================================================
*
* wcsconfig_f77.h is generated from wcsconfig_f77.h.in by 'configure'. It
* contains C preprocessor definitions for building the WCSLIB 5.16 Fortran
* wrappers.
*
* Author: Mark Calabretta, Australia Telescope National Facility, CSIRO.
* http://www.atnf.csiro.au/people/Mark.Calabretta
* $Id: wcsconfig_f77.h.in,v 5.16 2017/01/15 04:25:03 mcalabre Exp $
*===========================================================================*/
/* Integer array type large enough to hold an address. Set here to int[2] for
* 64-bit addresses, but could be defined as int* on 32-bit machines. */
typedef int iptr[2];
/* Macro for mangling Fortran subroutine names that do not contain
* underscores. Typically a name like "WCSINI" (case-insensitive) will become
* something like "wcsini_" (case-sensitive). The Fortran wrappers, which are
* written in C, are preprocessed into names that match the latter. The macro
* takes two arguments which specify the name in lower and upper case. */
#undef F77_FUNC
|
