ENH: fix upper case

Modules/FortranCInterface.cmake

@@ -187,10 +187,10 @@ function(create_fortran_c_interface NAMESPACE FUNCTIONS HEADER)
     endif(found)
   endif(NOT FORTRAN_C_MANGLING_FOUND)
   foreach(f ${${FUNCTIONS}})
-    if(${FORTRAN_C_MANGLING_UPPERCASE})
-      string(TOUPPER "${f}" ff)
+    if(FORTRAN_C_MANGLING_UPPERCASE)
+      string(TOUPPER "${f}" f)
     else()
-      string(TOLOWER "${f}" ff)
+      string(TOLOWER "${f}" f)
     endif()
     if("${f}" MATCHES ":")
       string(REGEX REPLACE "(.*):(.*)" "\\1" module "${f}")
@@ -199,7 +199,7 @@ function(create_fortran_c_interface NAMESPACE FUNCTIONS HEADER)
 #define ${NAMESPACE}${module}_${function} ${FORTRAN_C_MODULE_PREFIX}${module}${FORTRAN_C_MODULE_SUFFIX}${function}
 ")
     else("${f}" MATCHES ":")
-      set(function "${FORTRAN_C_PREFIX}${ff}${FORTRAN_C_SUFFIX}")
+      set(function "${FORTRAN_C_PREFIX}${f}${FORTRAN_C_SUFFIX}")
       if("${f}" MATCHES "_" AND FORTRAN_C_MANGLING_EXTRA_UNDERSCORE)
         set(function "${function}_")
       endif("${f}" MATCHES "_" AND FORTRAN_C_MANGLING_EXTRA_UNDERSCORE)