projects
/
gcc.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
re PR fortran/28585 (Fortran 2003: Support NEW_LINE intrinsic)
[gcc.git]
/
gcc
/
fortran
/
check.c
diff --git
a/gcc/fortran/check.c
b/gcc/fortran/check.c
index 23658221705bc5764c431bfadf8299c9b6021fd6..4884265a329ffffc18da0d9ce1ba2c078ca5a14d 100644
(file)
--- 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)