2018-11-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>

	PR libfortran/78351
	* io/transfer.c (read_sf_internal): Delete leftover
	debug code.

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

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 336c1c00de4f58b0644a083660301d8da67380cd..8536e8befe98e81024c30b46c6d5ffa6ba731956 100644 (file)
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,9 @@
+2018-11-09  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
+
+       PR libfortran/78351
+       * io/transfer.c (read_sf_internal): Delete leftover
+       debug code.
+
 2018-11-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 
        PR libfortran/78351

diff --git a/libgfortran/io/transfer.c b/libgfortran/io/transfer.c
index 21bfea486404aa5fb76ce396e94fb983a6811552..4013b3be60ab01c595f217e8130e31f3878f1e80 100644 (file)
--- a/libgfortran/io/transfer.c
+++ b/libgfortran/io/transfer.c
@@ -255,7 +255,6 @@ read_sf_internal (st_parameter_dt *dtp, size_t *length)
      requested length could go past the end of a comma shortened
      string.  We only do this if -std=legacy was given at compile
      time.  We also do not support this on kind=4 strings.  */
-  printf("allow_std=%d\n", compile_options.warn_std);
   if (unlikely(compile_options.warn_std == 0)) // the slow legacy way.
     {
       size_t n;