Teuchos Package Browser (Single Doxygen Collection)  Version of the Day
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
Macros
Teuchos_F77_wrappers.h File Reference

Macros for portably calling Fortran77 from C/C++. More...

#include "Teuchos_ConfigDefs.hpp"
Include dependency graph for Teuchos_F77_wrappers.h:

Go to the source code of this file.

Macros

#define F77_CALL_PREFIX
 
#define FORTRAN_CHAR_1_ARG(ARG_NAME)   char* ARG_NAME
 
#define FORTRAN_CONST_CHAR_1_ARG(ARG_NAME)   const char& ARG_NAME
 
#define FORTRAN_CHAR_1_ARG_CALL(ARG_NAME)   ARG_NAME
 
#define FORTRAN_NAME_UL(UNAME, LNAME)   F77_FUNC(LNAME,UNAME)
 
#define FORTRAN_FUNC_DECL_UL(TYPE, UFUNC_NAME, LFUNC_NAME)   TYPE F77_CALL_PREFIX FORTRAN_NAME_UL(UFUNC_NAME,LFUNC_NAME)
 
#define FORTRAN_FUNC_CALL_UL(UFUNC_NAME, LFUNC_NAME)   FORTRAN_NAME_UL(UFUNC_NAME,LFUNC_NAME)
 
#define FORTRAN_FUNC_PTR_DECL_UL(TYPE, UFUNC_NAME, LFUNC_NAME)   TYPE (F77_CALL_PREFIX *FORTRAN_NAME_UL(UFUNC_NAME,LFUNC_NAME))
 
#define FORTRAN_COMMMON_BLOCK_NAME_UL(UNAME, LNAME)   FORTRAN_NAME_UL(UNAME,LNAME)\
 
#define FORTRAN_NAME_UL_(UNAME, LNAME)   F77_FUNC_(LNAME,UNAME)
 
#define FORTRAN_FUNC_DECL_UL_(TYPE, UFUNC_NAME, LFUNC_NAME)   TYPE F77_CALL_PREFIX FORTRAN_NAME_UL_(UFUNC_NAME,LFUNC_NAME)
 
#define FORTRAN_FUNC_CALL_UL_(UFUNC_NAME, LFUNC_NAME)   FORTRAN_NAME_UL_(UFUNC_NAME,LFUNC_NAME)
 
#define FORTRAN_FUNC_PTR_DECL_UL_(TYPE, UFUNC_NAME, LFUNC_NAME)   TYPE (F77_CALL_PREFIX *FORTRAN_NAME_UL_(UFUNC_NAME,LFUNC_NAME))
 
#define FORTRAN_COMMMON_BLOCK_NAME_UL_(UNAME, LNAME)   FORTRAN_NAME_UL_(UNAME,LNAME)\
 

Detailed Description

Macros for portably calling Fortran77 from C/C++.

Definition in file Teuchos_F77_wrappers.h.

Macro Definition Documentation

#define F77_CALL_PREFIX

Definition at line 45 of file Teuchos_F77_wrappers.h.

#define FORTRAN_CHAR_1_ARG (   ARG_NAME)    char* ARG_NAME

Definition at line 46 of file Teuchos_F77_wrappers.h.

#define FORTRAN_CONST_CHAR_1_ARG (   ARG_NAME)    const char& ARG_NAME

Definition at line 47 of file Teuchos_F77_wrappers.h.

#define FORTRAN_CHAR_1_ARG_CALL (   ARG_NAME)    ARG_NAME

Definition at line 48 of file Teuchos_F77_wrappers.h.

#define FORTRAN_NAME_UL (   UNAME,
  LNAME 
)    F77_FUNC(LNAME,UNAME)

Definition at line 57 of file Teuchos_F77_wrappers.h.

#define FORTRAN_FUNC_DECL_UL (   TYPE,
  UFUNC_NAME,
  LFUNC_NAME 
)    TYPE F77_CALL_PREFIX FORTRAN_NAME_UL(UFUNC_NAME,LFUNC_NAME)

Definition at line 59 of file Teuchos_F77_wrappers.h.

#define FORTRAN_FUNC_CALL_UL (   UFUNC_NAME,
  LFUNC_NAME 
)    FORTRAN_NAME_UL(UFUNC_NAME,LFUNC_NAME)

Definition at line 61 of file Teuchos_F77_wrappers.h.

#define FORTRAN_FUNC_PTR_DECL_UL (   TYPE,
  UFUNC_NAME,
  LFUNC_NAME 
)    TYPE (F77_CALL_PREFIX *FORTRAN_NAME_UL(UFUNC_NAME,LFUNC_NAME))

Definition at line 63 of file Teuchos_F77_wrappers.h.

#define FORTRAN_COMMMON_BLOCK_NAME_UL (   UNAME,
  LNAME 
)    FORTRAN_NAME_UL(UNAME,LNAME)\

Definition at line 65 of file Teuchos_F77_wrappers.h.

#define FORTRAN_NAME_UL_ (   UNAME,
  LNAME 
)    F77_FUNC_(LNAME,UNAME)

Definition at line 67 of file Teuchos_F77_wrappers.h.

#define FORTRAN_FUNC_DECL_UL_ (   TYPE,
  UFUNC_NAME,
  LFUNC_NAME 
)    TYPE F77_CALL_PREFIX FORTRAN_NAME_UL_(UFUNC_NAME,LFUNC_NAME)

Definition at line 69 of file Teuchos_F77_wrappers.h.

#define FORTRAN_FUNC_CALL_UL_ (   UFUNC_NAME,
  LFUNC_NAME 
)    FORTRAN_NAME_UL_(UFUNC_NAME,LFUNC_NAME)

Definition at line 71 of file Teuchos_F77_wrappers.h.

#define FORTRAN_FUNC_PTR_DECL_UL_ (   TYPE,
  UFUNC_NAME,
  LFUNC_NAME 
)    TYPE (F77_CALL_PREFIX *FORTRAN_NAME_UL_(UFUNC_NAME,LFUNC_NAME))

Definition at line 73 of file Teuchos_F77_wrappers.h.

#define FORTRAN_COMMMON_BLOCK_NAME_UL_ (   UNAME,
  LNAME 
)    FORTRAN_NAME_UL_(UNAME,LNAME)\

Definition at line 75 of file Teuchos_F77_wrappers.h.