re PR fortran/31675 (Fortran front-end and libgfortran should have a common header...

[gcc.git] / libgfortran / runtime / string.c

diff --git a/libgfortran/runtime/string.c b/libgfortran/runtime/string.c
index 9dfda2b8611e5ef9ded399282fabacb19381d09b..ee7bcfb4be8ad23d8b73c574988a9149eeaddc37 100644 (file)
--- a/libgfortran/runtime/string.c
+++ b/libgfortran/runtime/string.c
@@ -122,7 +122,7 @@ find_option (st_parameter_common *cmp, const char *s1, gfc_charlen_type s1_len,
     if (compare0 (s1, s1_len, opts->name))
       return opts->value;
 
-  generate_error (cmp, ERROR_BAD_OPTION, error_message);
+  generate_error (cmp, LIBERROR_BAD_OPTION, error_message);
 
   return -1;
 }