Sign in
llvm
/
llvm-project
/
flang
/
13c7341956b6f72c0e035998c5cbc934efd2154d
/
.
/
test
/
Semantics
/
resolve23.f90
blob: 01178a1264e309a3d04cb3fc2a100af356d57708 [
file
] [
log
] [
blame
]
!
RUN
:
%
S
/
test_errors
.
sh
%
s
%
t
%
f18
module
m
type
::
t
real
::
y
end
type
end
module
use
m
implicit
type
(
t
)(
x
)
z
=
x
%
y
!
OK
:
x
is
type
(
t
)
!
ERROR
:
'w'
is
not
an
object
of derived type
;
it
is
implicitly typed
z
=
w
%
y
end