1 //===-- runtime/assign-impl.h -----------------------------------*- C++ -*-===//
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
7 //===----------------------------------------------------------------------===//
9 #ifndef FORTRAN_RUNTIME_ASSIGN_IMPL_H_
10 #define FORTRAN_RUNTIME_ASSIGN_IMPL_H_
12 namespace Fortran::runtime
{
16 // Assign one object to another via allocate statement from source specifier.
17 // Note that if allocate object and source expression have the same rank, the
18 // value of the allocate object becomes the value provided; otherwise the value
19 // of each element of allocate object becomes the value provided (9.7.1.2(7)).
20 RT_API_ATTRS
void DoFromSourceAssign(
21 Descriptor
&, const Descriptor
&, Terminator
&);
23 } // namespace Fortran::runtime
24 #endif // FORTRAN_RUNTIME_ASSIGN_IMPL_H_