Cc:ing Thomas, who knows openacc better. There is a devel/omp/gcc-12 branch you might want to try. I don't know how different that branch is wrt openacc.
HTH, On Mon, 24 Apr 2023 19:39:15 +0200 Patrick Begou via Fortran <fortran@gcc.gnu.org> wrote: > Hi Harald > > as I said, it is a large, massively parallel fortran code: more than 700 > files, some with several thousands of lines. It could be difficult to > create a small reproducer but I will try if the problem is not known as > an other git branch of this code also create an internal error on > another file. > > Best regards > > Patrick > > Le 24/04/2023 à 19:27, Harald Anlauf a écrit : > > Hi Patrick, > > > > I did not see any similar report in bugzilla, so could you please > > open a PR and attach a self-contained reproducer? Ideally the > > reproducer would be reduced to simplify the analysis for those > > familiar with the status of the OpenACC implementation. > > > > Thanks, > > Harald > > > > Am 21.04.23 um 17:13 schrieb Patrick Begou: > >> Hi, > >> > >> I have built this morning the latest gfortran from a git clone: > >> > >> GNU Fortran (GCC) 13.0.1 20230421 (prerelease) > >> > >> I'm trying this compiler on a large and complexe Fortran90 code with > >> offloading using OpenACC. > >> > >> At this time: > >> > >> - code compiles with nvfortran and runs on A100 GPU. > >> > >> - code compiles with Cray Fortran (with some difficulties) but do not > >> run on MI250 GPU (we are tacking the problem, a segfault if openacc is > >> set on) > >> > >> - code compile with GNU GCC 13 without -fopenacc option and runs on cpu > >> (Epyc2 7302) > >> > >> - a basic test-code using OpenACC compiles and run on the GPU. > >> > >> - compiling my large code with gcc 13.0.1 using -fopenacc for A100 GPU > >> produce an internal error in the compiler : > >> > >> > >> transforms_defs_m.f90:354:53: > >> > >> 354 | !$acc enter data attach(atransform2%next) > >> | ^ > >> internal compiler error: in omp_group_base, at gimplify.cc:9412 > >> 0xa830c6 omp_group_base > >> ../../gcc/gcc/gimplify.cc:9412 > >> 0xa830c6 omp_index_mapping_groups_1 > >> ../../gcc/gcc/gimplify.cc:9441 > >> 0xa833c7 omp_index_mapping_groups > >> ../../gcc/gcc/gimplify.cc:9502 > >> 0xa96a9a gimplify_scan_omp_clauses > >> ../../gcc/gcc/gimplify.cc:10802 > >> 0xa8660d gimplify_omp_target_update > >> ../../gcc/gcc/gimplify.cc:15563 > >> 0xa8660d gimplify_expr(tree_node**, gimple**, gimple**, bool > >> (*)(tree_node*), int) > >> ../../gcc/gcc/gimplify.cc:16928 > >> 0xa89826 gimplify_stmt(tree_node**, gimple**) > >> ../../gcc/gcc/gimplify.cc:7219 > >> 0xa875a3 gimplify_statement_list > >> ../../gcc/gcc/gimplify.cc:2019 > >> 0xa875a3 gimplify_expr(tree_node**, gimple**, gimple**, bool > >> (*)(tree_node*), int) > >> ../../gcc/gcc/gimplify.cc:16821 > >> 0xa89826 gimplify_stmt(tree_node**, gimple**) > >> ../../gcc/gcc/gimplify.cc:7219 > >> 0xa86e8a gimplify_and_add(tree_node*, gimple**) > >> ../../gcc/gcc/gimplify.cc:492 > >> 0xa86e8a gimplify_loop_expr > >> ../../gcc/gcc/gimplify.cc:1993 > >> 0xa86e8a gimplify_expr(tree_node**, gimple**, gimple**, bool > >> (*)(tree_node*), int) > >> ../../gcc/gcc/gimplify.cc:16581 > >> 0xa89826 gimplify_stmt(tree_node**, gimple**) > >> ../../gcc/gcc/gimplify.cc:7219 > >> 0xa875a3 gimplify_statement_list > >> ../../gcc/gcc/gimplify.cc:2019 > >> 0xa875a3 gimplify_expr(tree_node**, gimple**, gimple**, bool > >> (*)(tree_node*), int) > >> ../../gcc/gcc/gimplify.cc:16821 > >> 0xa89826 gimplify_stmt(tree_node**, gimple**) > >> ../../gcc/gcc/gimplify.cc:7219 > >> 0xa89d2b gimplify_bind_expr > >> ../../gcc/gcc/gimplify.cc:1430 > >> 0xa86d8e gimplify_expr(tree_node**, gimple**, gimple**, bool > >> (*)(tree_node*), int) > >> ../../gcc/gcc/gimplify.cc:16577 > >> 0xa89826 gimplify_stmt(tree_node**, gimple**) > >> ../../gcc/gcc/gimplify.cc:7219 > >> Please submit a full bug report, with preprocessed source (by using > >> -freport-bug). > >> > >> > >> Options used (I've just added -fopenacc for moving from cpu version to > >> OpenACC): > >> > >> -fopenacc -freport-bug -g -fpic -x f95-cpp-input -std=gnu -ffree-form > >> -fall-intrinsics -fallow-argument-mismatch -Wall -Wextra -W > >> -Wno-unused-function -Wno-compare-reals -fno-omit-frame-pointer -O3 > >> -ftree-vectorize -ffast-math -funroll-loops -pipe > >> > >> No additionnal files a produced with -freport-bug. > >> > >> In attachment the script used to build the compiler. > >> > >> Let me know how I can help with informations to improve Gnu fortran > >> compilers. > >> > >> Patrick > > >
