forked from OSchip/llvm-project
[flang] checkpoint
Original-commit: flang-compiler/f18@1e213f3fbe Reviewed-on: https://github.com/flang-compiler/f18/pull/346 Tree-same-pre-rewrite: false
This commit is contained in:
parent
afd0c19fec
commit
c090abef3b
|
@ -61,8 +61,8 @@ bool DummyProcedure::operator==(const DummyProcedure &that) const {
|
|||
|
||||
std::ostream &DummyProcedure::Dump(std::ostream &o) const {
|
||||
attrs.Dump(o, EnumToString);
|
||||
if (explicitProcedure.has_value()) {
|
||||
explicitProcedure.value().Dump(o);
|
||||
if (explicitProcedure) {
|
||||
explicitProcedure->Dump(o);
|
||||
}
|
||||
return o;
|
||||
}
|
||||
|
@ -98,5 +98,6 @@ std::ostream &Procedure::Dump(std::ostream &o) const {
|
|||
}
|
||||
return o << (sep == '(' ? "()" : ")");
|
||||
}
|
||||
DEFINE_DEFAULT_CONSTRUCTORS_AND_ASSIGNMENTS(DummyProcedure)
|
||||
}
|
||||
DEFINE_DELETER(Fortran::evaluate::characteristics::Procedure)
|
||||
|
|
|
@ -53,7 +53,7 @@ struct DummyDataObject {
|
|||
// 15.3.2.3
|
||||
struct DummyProcedure {
|
||||
ENUM_CLASS(Attr, Pointer, Optional)
|
||||
DEFAULT_CONSTRUCTORS_AND_ASSIGNMENTS(DummyProcedure)
|
||||
DECLARE_CONSTRUCTORS_AND_ASSIGNMENTS(DummyProcedure)
|
||||
std::unique_ptr<Procedure, common::Deleter<Procedure>> explicitProcedure;
|
||||
common::EnumSet<Attr, 32> attrs;
|
||||
bool operator==(const DummyProcedure &) const;
|
||||
|
|
Loading…
Reference in New Issue