11 lines · plain
1! This test checks lowering of OpenMP allocate Directive with align clause.2 3! RUN: not %flang_fc1 -emit-fir -fopenmp -fopenmp-version=51 %s 2>&1 | FileCheck %s4 5program main6 integer :: x7 8 ! CHECK: not yet implemented: OmpAllocateDirective9 !$omp allocate(x) align(32)10end11