1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/f/com.c b/gcc/f/com.c
index fbeb74b..82d99d8 100644
--- a/gcc/f/com.c
+++ b/gcc/f/com.c
@@ -1840,7 +1840,7 @@ ffecom_build_f2c_string_ (int i, const char *s)
       tmp = &space[0];
 
     for (p = s, q = tmp; *p != '\0'; ++p, ++q)
-      *q = ffesrc_toupper (*p);
+      *q = TOUPPER (*p);
     *q = '\0';
 
     t = build_string (i, tmp);