2698d15664
This patch introduces FIRToMemRef, a lowering pass that converts FIR memory operations to the MemRef dialect, including support for slices, shifts, and descriptor-style access patterns. To support partial lowering, where FIR and MemRef types can coexist, we extend the handling of fir.convert to correctly marshal between FIR reference-like types and MemRef descriptors. The patch also factors the type conversion logic into a reusable FIRToMemRefTypeConverter, which centralizes the rules for converting FIR types (e.g. !fir.ref, !fir.box, sequences, logicals) to their corresponding memref types, and is used throughout the new pass. --------- Co-authored-by: Scott Manley <rscottmanley@gmail.com> Co-authored-by: jeanPerier <jean.perier.polytechnique@gmail.com>
19 lines
1.2 KiB
MLIR
19 lines
1.2 KiB
MLIR
// RUN: fir-opt %s --fir-to-memref --allow-unregistered-dialect | FileCheck %s
|
|
|
|
// CHECK-LABEL: func.func @convert_complex_
|
|
// CHECK: [[DECL0:%[0-9]+]] = fir.declare %arg0
|
|
// CHECK: [[DECL1:%[0-9]+]] = fir.declare %arg1
|
|
// CHECK: [[CONVERT1:%[0-9]+]] = fir.convert [[DECL1]] : (!fir.ref<complex<f32>>) -> memref<complex<f32>>
|
|
// CHECK: [[LOAD:%[0-9]+]] = memref.load [[CONVERT1]][] : memref<complex<f32>>
|
|
// CHECK: [[CONVERT0:%[0-9]+]] = fir.convert [[DECL0]] : (!fir.ref<complex<f32>>) -> memref<complex<f32>>
|
|
// CHECK: memref.store [[LOAD]], [[CONVERT0]][] : memref<complex<f32>>
|
|
|
|
func.func @convert_complex_(%arg0: !fir.ref<complex<f32>> {fir.bindc_name = "a"}, %arg1: !fir.ref<complex<f32>> {fir.bindc_name = "b"}) attributes {fir.internal_name = "_QPconvert_complex"} {
|
|
%0 = fir.dummy_scope : !fir.dscope
|
|
%1 = fir.declare %arg0 dummy_scope %0 {uniq_name = "_QFconvert_complexEa"} : (!fir.ref<complex<f32>>, !fir.dscope) -> !fir.ref<complex<f32>>
|
|
%2 = fir.declare %arg1 dummy_scope %0 {uniq_name = "_QFconvert_complexEb"} : (!fir.ref<complex<f32>>, !fir.dscope) -> !fir.ref<complex<f32>>
|
|
%3 = fir.load %2 : !fir.ref<complex<f32>>
|
|
fir.store %3 to %1 : !fir.ref<complex<f32>>
|
|
return
|
|
}
|