@@ -88,6 +88,8 @@ function(discover_fortran_module_mangling prefix suffix found)
foreach(interface
"test_interface$"
"TEST_INTERFACE_mp_"
+ "_test_interface__"
+ "__test_interface__"
"__test_interface_NMOD_"
"__test_interface_MOD_")
test_fortran_mangling("${CODE}" "${interface}"