craycc/ftn: OpenMP 5.1/5.2/6.0 forms HPE does not claim are rejected, and some crash the compiler instead of a diagnostic

// # Draft finding: omp52-c-clause-from-iterator on cce19
//
// - compiler: cce19
// - toolchain: cce19; arch: gfx942; machine: tuolumne; memory mode: unified; opt: -O2
// - program: catalog omp52-c-clause-from-iterator (c, version 52, sha256 a2f233574ec18e5d)
// - expected: None (None; )
// - actual: rejected  (diagnostic: <tmpdir>/omp52-c-clause-from-iterator.c:41:34: error: call to undeclared function 'iterator'; ISO C99 and later do not support implicit function declarations [-Wimplicit-function-declarati)
// - verdict: compiler_bug by rule R11-compile-rejection: a legal program the compiler rejects with a diagnostic (or whose link fails on symbols the compiler's own code needs, or whose compile does not finish) while another compiler family compiles it
// - reason: 
// - citations: RUL-COMPILE-TIME (rulings.md)
// - legality: legal (legal by construction: offload.engine.gen / c_gen / acc_gen check every program against the catalog rules and the offload scope as it is built (no compiler))
// - witnesses: none
// - withdrawn: none
//
// Generated by compliance.c_gen (OpenMP 5.2, C11): the C port (offload.engine.f2c) of omp52-clause-from-iterator. Do not edit.
// id: omp52-c-clause-from-iterator
// primary atom: omp.clause.from.iterator
// legal: yes
// observable: yes
// ran_on_host: inside the target region of interest
// evidence: copy_mode_only
// needs: none
// std: c11
#include <stdio.h>
#include <stdbool.h>
#include <omp.h>

enum { n = 64 };

int main(void) {
  int a[n];
  int b[n];
  int ref[n];
  int host_flag;
  bool ok;
  int k;
  for (int i = 1; i <= n; i++) {
    a[i - 1] = i;
    b[i - 1] = 0;
    ref[i - 1] = 2 * (i + 10) + 1;
  }
  host_flag = 1;
  #pragma omp target enter data map(to: a) map(alloc: b)
  for (int i = 1; i <= n; i++) {
    a[i - 1] = a[i - 1] + 10;
  }
  #pragma omp target update to(a)
  #pragma omp target map(to: a) map(from: b) map(tofrom: host_flag)
  {
    host_flag = (omp_is_initial_device() ? 1 : 0);
    for (int i = 1; i <= n; i++) {
      b[i - 1] = 2 * a[i - 1] + 1;
    }
  }
  #pragma omp target update from(iterator(k = 1:2): b[k - 1:n - k + 1])
  #pragma omp target exit data map(release: a, b)
  bool t1_ = true;
  for (int k2_ = 0; k2_ < n; k2_++)
    t1_ = t1_ && (b[k2_] == ref[k2_]);
  ok = t1_;
  printf("RESULT ran_on_host=%d check=%s\n", host_flag, ok ? "pass" : "fail");
  return 0;
}