[Flang][OpenMP]Add parsing support for DISPATCH construct (#121982)

[llvm-project.git] / flang / test / Parser / bad-label.f

! RUN: %flang_fc1 -fsyntax-only -pedantic %s 2>&1 | FileCheck %s
!CHECK: portability: Label should be in the label field
      goto 1;  1 continue
      end