For the program
program main
implicit none
real :: xx
double precision :: yy
call random_seed()
call random_number(yy)
xx = yy ! assign double to single
print*,"yy =",yy
print*,"xx =",xx
end program main
g95 -Wall -Wextra says
In file xreal_dp.f90:7
xx = yy
1
Warning (140): Implicit conversion at (1) may cause
precision loss
I request a similar warning from gfortran. None is currently given when
compiling with
gfortran -Wall -pedantic -std=f2003 xreal_dp.f90 .
Vivek Rao
--
Summary: warn about implicit conversion causing loss of precision
Product: gcc
Version: 4.3.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: vivekrao4 at yahoo dot com
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31637
