16 lines · plain
1! Reproducer for https://github.com/llvm/llvm-project/issues/124043 lowering2! crash.3! RUN: bbc -emit-hlfir -o - %s | FileCheck %s4 5subroutine repro(a)6 integer a(10)7 associate (b => a(::2)+1)8 call bar(b)9 end associate10end11! CHECK-LABEL: func.func @_QPrepro(12! CHECK: %[[VAL_11:.*]] = hlfir.elemental13! CHECK: %[[VAL_16:.*]]:3 = hlfir.associate %[[VAL_11]]14! CHECK: %[[VAL_18:.*]]:2 = hlfir.declare %[[VAL_16]]#015! CHECK: fir.call @_QPbar(%[[VAL_18]]#0)16