From 004852fc23a889686b53e2bad5121d7afc6803e3 Mon Sep 17 00:00:00 2001 From: peter klausler Date: Wed, 16 May 2018 11:32:24 -0700 Subject: [PATCH] [flang] Add a TODO. Original-commit: flang-compiler/f18@b9b929384b018bc1898d1b099bcc47a675b165fe Reviewed-on: https://github.com/flang-compiler/f18/pull/92 Tree-same-pre-rewrite: false --- flang/runtime/descriptor.h | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/flang/runtime/descriptor.h b/flang/runtime/descriptor.h index 1bb0bb0..bcbc80e 100644 --- a/flang/runtime/descriptor.h +++ b/flang/runtime/descriptor.h @@ -261,6 +261,7 @@ struct ProcedurePointer { // Extended derived types have the EXTENDS flag set and place their base // component first in the component descriptions, which is significant for // the execution of FINAL subroutines. +// TODO: Link to defined assignment subroutines and their characteristics. class DerivedType { public: const char *name() const { return name_; } @@ -282,10 +283,10 @@ public: bool IsSameType(const DerivedType &); private: - const char *name_; // NUL-terminated constant text - std::size_t bytes_; // allocation size of one scalar instance, w/ alignment enum Flag { EXTENDS = 1, SEQUENCE = 2, BIND = 4, ANY_PRIVATE = 8 }; + const char *name_; // NUL-terminated constant text + std::size_t bytes_; // allocation size of one scalar instance, w/ alignment std::uint64_t flags_; // needed for IsSameType() correct semantics const char *initializer_; // can be null; includes base components std::size_t kindParameters_; -- 2.7.4