text: //===-- runtime/derived-api.h ---------------------------------------------===//
  //
  // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
  // See https://llvm.org/LICENSE.txt for license information.
  // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
  //
  //===----------------------------------------------------------------------===//
  
  // API for lowering to use for operations on derived type objects.
  // Initialiaztion and finalization are implied for pointer and allocatable
  // ALLOCATE()/DEALLOCATE() respectively, so these APIs should be used only for
  // local variables.  Whole allocatable assignment should use AllocatableAssign()
  // instead of this Assign().
  
  #ifndef FLANG_RUNTIME_DERIVED_API_H_
  #define FLANG_RUNTIME_DERIVED_API_H_
  
  #include "entry-names.h"
  
  namespace Fortran::runtime {
  class Descriptor;
  
  extern "C" {
  
  // Initializes and allocates an object's components, if it has a derived type
  // with any default component initialization or automatic components.
  // The descriptor must be initialized and non-null.
  void RTNAME(Initialize)(
      const Descriptor &, const char *sourceFile = nullptr, int sourceLine = 0);
  
  // Finalizes an object and its components.  Deallocates any
  // allocatable/automatic components.  Does not deallocate the descriptor's
  // storage.
  void RTNAME(Destroy)(const Descriptor &);
  
  // Intrinsic or defined assignment, with scalar expansion but not type
  // conversion.
  void RTNAME(Assign)(const Descriptor &, const Descriptor &,
      const char *sourceFile = nullptr, int sourceLine = 0);
  
  } // extern "C"
  } // namespace Fortran::runtime
  #endif // FLANG_RUNTIME_DERIVED_API_H_
  