diff options
Diffstat (limited to 'gcc/fortran/check.c')
| -rw-r--r-- | gcc/fortran/check.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/fortran/check.c b/gcc/fortran/check.c index 2365822..4884265 100644 --- a/gcc/fortran/check.c +++ b/gcc/fortran/check.c @@ -1827,6 +1827,14 @@ gfc_check_nearest (gfc_expr * x, gfc_expr * s) return SUCCESS; } +try +gfc_check_new_line (gfc_expr * a) +{ + if (type_check (a, 0, BT_CHARACTER) == FAILURE) + return FAILURE; + + return SUCCESS; +} try gfc_check_null (gfc_expr * mold) |