! This test checks lowering of OpenMP allocate Directive with align clause.

! RUN: not %flang_fc1 -emit-fir -fopenmp -fopenmp-version=51 %s 2>&1 | FileCheck %s

program main
  integer :: x

  ! CHECK: not yet implemented: OmpAllocateDirective
  !$omp allocate(x) align(32)
end