Lines Matching defs:arg1
25 !CHECK: %[[PVT_ALLOC:.*]] = fir.alloca complex<f32> {bindc_name = "arg1", {{.*}}}
45 subroutine firstprivate_complex(arg1, arg2)
46 complex(4) :: arg1
49 !$OMP PARALLEL FIRSTPRIVATE(arg1, arg2)
50 call foo(arg1, arg2)
74 subroutine firstprivate_integer(arg1, arg2, arg3, arg4, arg5, arg6)
75 integer :: arg1
82 !$OMP PARALLEL FIRSTPRIVATE(arg1, arg2, arg3, arg4, arg5, arg6)
83 call bar(arg1, arg2, arg3, arg4, arg5, arg6)
104 subroutine firstprivate_logical(arg1, arg2, arg3, arg4, arg5)
105 logical :: arg1
111 !$OMP PARALLEL FIRSTPRIVATE(arg1, arg2, arg3, arg4, arg5)
112 call baz(arg1, arg2, arg3, arg4, arg5)
135 subroutine firstprivate_real(arg1, arg2, arg3, arg4, arg5, arg6)
136 real :: arg1
143 !$OMP PARALLEL FIRSTPRIVATE(arg1, arg2, arg3, arg4, arg5, arg6)
144 call qux(arg1, arg2, arg3, arg4, arg5, arg6)