| //===- Complex.cpp - C Interface for Complex dialect ----------------------===// |
| // |
| // 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 |
| // |
| //===----------------------------------------------------------------------===// |
| |
| #include "mlir-c/Dialect/Complex.h" |
| #include "mlir-c/IR.h" |
| #include "mlir-c/Support.h" |
| #include "mlir/CAPI/Registration.h" |
| #include "mlir/Dialect/Complex/IR/Complex.h" |
| |
| using namespace mlir; |
| |
| MLIR_DEFINE_CAPI_DIALECT_REGISTRATION(Complex, complex, |
| mlir::complex::ComplexDialect) |
| |
| bool mlirAttributeIsAComplex(MlirAttribute attr) { |
| return isa<complex::NumberAttr>(unwrap(attr)); |
| } |
| |
| MlirAttribute mlirComplexAttrDoubleGet(MlirContext ctx, MlirType type, |
| double real, double imag) { |
| return wrap( |
| complex::NumberAttr::get(cast<ComplexType>(unwrap(type)), real, imag)); |
| } |
| |
| MlirAttribute mlirComplexAttrDoubleGetChecked(MlirLocation loc, MlirType type, |
| double real, double imag) { |
| return wrap(complex::NumberAttr::getChecked( |
| unwrap(loc), cast<ComplexType>(unwrap(type)), real, imag)); |
| } |
| |
| double mlirComplexAttrGetRealDouble(MlirAttribute attr) { |
| return cast<complex::NumberAttr>(unwrap(attr)).getReal().convertToDouble(); |
| } |
| |
| double mlirComplexAttrGetImagDouble(MlirAttribute attr) { |
| return cast<complex::NumberAttr>(unwrap(attr)).getImag().convertToDouble(); |
| } |
| |
| MlirTypeID mlirComplexAttrGetTypeID(void) { |
| return wrap(complex::NumberAttr::getTypeID()); |
| } |