Hi,

just one remark:

    OMP_REDUCTION_NONE = -1,
@@ -1760,8 +1771,10 @@ typedef struct gfc_omp_clauses
    struct gfc_expr *num_gangs_expr;
    struct gfc_expr *num_workers_expr;
    struct gfc_expr *vector_length_expr;
+  struct gfc_expr *device_num_expr;

    unsigned if_present:1,finalize:1;

This would also need to go into gfc_expr_walker in frontend-passes.cc.
There are a few missing, I submitted a PR just yesterday,
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=126037 .

(Would be a simple obvious fix).

Best regards

        Thomas

Reply via email to