ENH: fix check for intel windows module mangling

This commit is contained in:
Bill Hoffman 2008-10-29 19:34:12 -04:00
parent 4dd0afd069
commit 574530c07d
1 changed files with 1 additions and 0 deletions

View File

@ -93,6 +93,7 @@ function(discover_fortran_module_mangling prefix suffix found)
test_fortran_mangling("${CODE}" "${interface}"
${FORTRAN_C_MANGLING_UPPERCASE} "" "module" "sub" worked)
if(worked)
string(TOLOWER "${interface}" interface)
string(REGEX REPLACE "(.*)test_interface(.*)" "\\1" pre "${interface}")
string(REGEX REPLACE "(.*)test_interface(.*)" "\\2" post "${interface}")
set(${prefix} "${pre}" PARENT_SCOPE)