diff --git a/src/ccpp_xml.F90 b/src/ccpp_xml.F90 index 7deb47ac..4dd6d776 100644 --- a/src/ccpp_xml.F90 +++ b/src/ccpp_xml.F90 @@ -91,7 +91,7 @@ function ccpp_xml_unload & end function ccpp_xml_unload integer(c_int32_t) & - function ccpp_xml_ele_find_c & + function ccpp_xml_ele_find_c & (xml, name, ele) & bind(c, name='ccpp_xml_ele_find') import :: c_int32_t, c_ptr, c_char