awips2/nativeLib/rary.ohd.util/inc/create_fortran_link.h
root 9bb8decbcf Initial revision of AWIPS2 11.9.0-7p5
Former-commit-id: 133dc97f67 [formerly a02aeb236c] [formerly 9f19e3f712] [formerly 06a8b51d6d [formerly 9f19e3f712 [formerly 64fa9254b946eae7e61bbc3f513b7c3696c4f54f]]]
Former-commit-id: 06a8b51d6d
Former-commit-id: 377dcd10b9 [formerly 3360eb6c5f]
Former-commit-id: 8e80217e59
2012-01-06 08:55:05 -06:00

17 lines
508 B
C

/*
* create_fortran_link.h
*
* Created on: May 5, 2009
* Author: jelkins
*/
#ifndef CREATE_FORTRAN_LINK_H_
#define CREATE_FORTRAN_LINK_H_
#define create_fortran_link(function_return,c_function_name,arguments_with_type,arguments_without_type)\
function_return c_function_name arguments_with_type;\
function_return c_function_name ##_ arguments_with_type { c_function_name arguments_without_type; }\
function_return c_function_name arguments_with_type
#endif /* CREATE_FORTRAN_LINK_H_ */