1 //===-- FIRDialect.cpp ----------------------------------------------------===// 2 // 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 6 // 7 //===----------------------------------------------------------------------===// 8 9 #include "flang/Optimizer/Dialect/FIRDialect.h" 10 #include "flang/Optimizer/Dialect/FIRAttr.h" 11 #include "flang/Optimizer/Dialect/FIROps.h" 12 #include "flang/Optimizer/Dialect/FIRType.h" 13 14 using namespace fir; 15 16 fir::FIROpsDialect::FIROpsDialect(mlir::MLIRContext *ctx) 17 : mlir::Dialect("fir", ctx, mlir::TypeID::get<FIROpsDialect>()) { 18 addTypes<BoxType, BoxCharType, BoxProcType, CharacterType, CplxType, DimsType, 19 FieldType, HeapType, IntType, LenType, LogicalType, PointerType, 20 RealType, RecordType, ReferenceType, SequenceType, TypeDescType>(); 21 addAttributes<ClosedIntervalAttr, ExactTypeAttr, LowerBoundAttr, 22 PointIntervalAttr, RealAttr, SubclassAttr, UpperBoundAttr>(); 23 addOperations< 24 #define GET_OP_LIST 25 #include "flang/Optimizer/Dialect/FIROps.cpp.inc" 26 >(); 27 } 28 29 // anchor the class vtable to this compilation unit 30 fir::FIROpsDialect::~FIROpsDialect() { 31 // do nothing 32 } 33 34 mlir::Type fir::FIROpsDialect::parseType(mlir::DialectAsmParser &parser) const { 35 return parseFirType(const_cast<FIROpsDialect *>(this), parser); 36 } 37 38 void fir::FIROpsDialect::printType(mlir::Type ty, 39 mlir::DialectAsmPrinter &p) const { 40 return printFirType(const_cast<FIROpsDialect *>(this), ty, p); 41 } 42 43 mlir::Attribute 44 fir::FIROpsDialect::parseAttribute(mlir::DialectAsmParser &parser, 45 mlir::Type type) const { 46 return parseFirAttribute(const_cast<FIROpsDialect *>(this), parser, type); 47 } 48 49 void fir::FIROpsDialect::printAttribute(mlir::Attribute attr, 50 mlir::DialectAsmPrinter &p) const { 51 printFirAttribute(const_cast<FIROpsDialect *>(this), attr, p); 52 } 53