------- Additional Comments From paulthomas2 at wanadoo dot fr  2005-08-03 
11:51 -------
Two separate USE statements works correctly, as the example below can 
demonstrate.  This has got to be solvable....

Paul T

module a
   integer, parameter :: b = kind(1.e0)
end module a
program d
   use a, only : e => b
   use a, only : f => b
   real(e) x
   real(f) y
   x = 1.e0_e
   y = 1.e0_f
   print *, x, y
end program d



-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18878

Reply via email to