00001 
00002 
00003 
00004 
00005 
00006 
00007 
00008 
00009 
00010 
00011 
00012 
00013 
00014 
00015 
00016 #include "hdf5.h"
00017 #include "H5private.h"
00018 #include "../src/H5f90i.h"
00019 #include "../src/H5f90proto.h"
00020 
00021 char *h5_fixname(const char *base_name, hid_t fapl, char *fullname, size_t size);
00022 
00023 
00024 
00025 
00026 #   define nh5_fixname_c              H5_FC_FUNC_(h5_fixname_c, H5_FIXNAME_C)
00027 #   define nh5_cleanup_c              H5_FC_FUNC_(h5_cleanup_c, H5_CLEANUP_C)
00028 #   define nh5_exit_c                 H5_FC_FUNC_(h5_exit_c, H5_EXIT_C)
00029 #   define nh5_env_nocleanup_c        H5_FC_FUNC_(h5_env_nocleanup_c, H5_ENV_NOCLEANUP_C)
00030 
00031 H5_FCTESTDLL int_f nh5_fixname_c
00032 (_fcd base_name, size_t_f *base_namelen, hid_t_f *fapl, _fcd full_name, size_t_f *full_namelen);
00033 
00034 H5_FCTESTDLL int_f nh5_cleanup_c
00035 (_fcd base_name, size_t_f *base_namelen, hid_t_f *fapl);
00036 
00037 H5_FCTESTDLL void nh5_exit_c
00038 (int_f *status);
00039 
00040 H5_FCTESTDLL void nh5_env_nocleanup_c
00041 (int_f *status);
00042