Sign in
cos
/
mirrors
/
github.com
/
llvm
/
llvm-project
/
refs/heads/main
/
.
/
flang
/
test
/
Lower
/
assign-statement.f90
blob: 342355bf469c85962eb650f29c899b18d9e93689 [
file
] [
log
] [
blame
] [
edit
]
!
RUN
:
bbc
-
emit
-
fir
-
o
-
%
s
|
FileCheck
%
s
!
CHECK
-
LABEL
:
func
@_QQmain
program main
integer
::
ip
pointer
::
ip
allocate
(
ip
)
assign
10
to ip
!
CHECK
:
fir
.
store
%
c10_i32 to
%
11
:
!
fir
.
ptr
<i32>
10
return
end
program main