Supported by, e.g., ifort and sunf95. (Not yet by g95 and NAG f95.) Example: ---------------------- module test implicit none real,parameter :: pi = 3.1415926535897932385 end module test
program usetest use :: test, mypi => pi real :: pi pi = 3.0 print *, mypi, pi ! Shall print "3.1415927 3.0" end program usetest ---------------------- See Fortran 2003: "11.2.1 The USE statement and use association" " R1109 use-stmt is USE [ [ , module-nature ] :: ] module-name [ , rename-list ] or USE [ [ , module-nature ] :: ] module-name , ONLY : [ only-list ] R1111 rename is local-name => use-name or OPERATOR (local-defined-operator) => OPERATOR (use-defined-operator) R1112 only is generic-spec or only-use-name or rename" -- Summary: Fortran 2003: Support USE with rename-list (local-name => use-name) Product: gcc Version: 4.3.0 Status: UNCONFIRMED Severity: enhancement Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: burnus at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=29643