print * list-directed output spacing

[David Edelsohn <dje dot gcc at gmail dot com>]

Earlier FORTRAN compilers generated the minimum number of spaces
required to delimit the items in list-directed output.  For instance,
if the three integers 1, 2, 3 are printed out from the trivial program
  PRINT *, 1, 2, 3
  END
we see
 1 2 3
^ ^ ^  <--- These point to the blanks in the previous line
 However, in the Intel Fortran environment and in recent versions of
the GNU Fortran environment, a more simplistic algorithm is used,
which usually results in lots of blank space; for instance, in the
mode where integers are four-byte objects, the printout is like this
           1           2           3
^^^^^^^^^^^ ^^^^^^^^^^^ ^^^^^^^^^^^  <--- These point to the blanks in
the previous line
and where they are eight-byte objects, the printout is like this
                    1                    2                    3
^^^^^^^^^^^^^^^^^^^^ ^^^^^^^^^^^^^^^^^^^^ ^^^^^^^^^^^^^^^^^^^^  <---
These point to the blanks in the previous line.

Intel provides a "-standard-semantics" command-line option to produce
the earlier behavior.  Is there any equivalent option for GNU Fortran?

Thanks, David