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 77 of file Teuchos_F77_wrappers.h.

#define FORTRAN_CHAR_1_ARG

(

ARG_NAME

)

char* ARG_NAME

Definition at line 78 of file Teuchos_F77_wrappers.h.

#define FORTRAN_CONST_CHAR_1_ARG

(

ARG_NAME

)

const char& ARG_NAME

Definition at line 79 of file Teuchos_F77_wrappers.h.

#define FORTRAN_CHAR_1_ARG_CALL

(

ARG_NAME

)

ARG_NAME

Definition at line 80 of file Teuchos_F77_wrappers.h.

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

Definition at line 89 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 91 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 93 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 95 of file Teuchos_F77_wrappers.h.

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

Definition at line 97 of file Teuchos_F77_wrappers.h.

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

Definition at line 99 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 101 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 103 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 105 of file Teuchos_F77_wrappers.h.

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

Definition at line 107 of file Teuchos_F77_wrappers.h.