OSDN Git Service

2010-12-09 Steven G. Kargl <kargl@gcc.gnu.org>
authorkargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 9 Dec 2010 16:02:50 +0000 (16:02 +0000)
committerkargl <kargl@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 9 Dec 2010 16:02:50 +0000 (16:02 +0000)
* check.c (gfc_check_sngl): Insert missing space in error message.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@167645 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/fortran/ChangeLog
gcc/fortran/check.c

index f4dedd8..0c1765f 100644 (file)
@@ -1,5 +1,9 @@
 2010-12-09  Steven G. Kargl  <kargl@gcc.gnu.org>
 
+       * check.c (gfc_check_sngl): Insert missing space in error message.
+
+2010-12-09  Steven G. Kargl  <kargl@gcc.gnu.org>
+
        * check.c (gfc_check_float): Insert missing space in error message.
 
 2010-12-07  Tobias Burnus  <burnus@net-b.de>
index b2b773d..ceea6f3 100644 (file)
@@ -3343,7 +3343,7 @@ gfc_check_sngl (gfc_expr *a)
     return FAILURE;
 
   if ((a->ts.kind != gfc_default_double_kind)
-      && gfc_notify_std (GFC_STD_GNU, "GNU extension: non double precision"
+      && gfc_notify_std (GFC_STD_GNU, "GNU extension: non double precision "
                         "REAL argument to %s intrinsic at %L",
                         gfc_current_intrinsic, &a->where) == FAILURE)
     return FAILURE;