https://gcc.gnu.org/bugzilla/show_bug.cgi?id=79383
Bug ID: 79383
Summary: USE statement error
Product: gcc
Version: 7.0.1
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: walt.brainerd at gmail dot com
Target Milestone: ---
Created attachment 40672
--> https://gcc.gnu.org/bugzilla/attachment.cgi?id=40672&action=edit
g_bug2.f90; complete program
I don't see anything wrong with the USE statement, BUT . . .
[I get the same error without "non_intrinsic"]
$ gfortran -Wall -Wextra g_bug2.f90
g_bug2.f90:37:73:
use, non_intrinsic :: dollar_mod, only: dollar_type, write (formatted)
1
Error: Module nature in USE statement at (1) shall be either INTRINSIC or
NON_INTRINSIC
g_bug2.f90:40:21:
type (dollar_type), parameter :: wage = dollar_type(15.10)
1
Error: Derived type 'dollar_type' at (1) is being used before it is defined
g_bug2.f90:41:34:
write (unit=*, fmt="(DT)") wage
1
Error: Symbol 'wage' at (1) has no IMPLICIT type