Done as revision 267884. Thanks again.
Paul On Sat, 12 Jan 2019 at 18:29, Paul Richard Thomas <paul.richard.tho...@gmail.com> wrote: > > Hi Steve, > > Many thanks for the heads up. I had seen similar problems with the the > second testcase and I thought that I had fixed them. I will delete > them from the tree and will do more work to fix the problem(s). > > Cheers > > Paul > > On Sat, 12 Jan 2019 at 17:17, Steve Kargl > <s...@troutmask.apl.washington.edu> wrote: > > > > On Sat, Jan 12, 2019 at 09:10:27AM -0800, Steve Kargl wrote: > > > On Sat, Jan 12, 2019 at 03:28:02PM +0000, Paul Richard Thomas wrote: > > > > Hi Thomas, > > > > > > > > Committed as revision 267881. I removed the duplicate include file and > > > > added some documentation, as suggested. > > > > > > > > Many thanks for all the help > > > > > > > > > > Paul, > > > > > > I'm seeing the following failures. Note, I have my uncommitted > > > ENTRY patch in my tree. I won't be able to investigate for about > > > 30 minutes. > > > > > > FAIL: gfortran.dg/ISO_Fortran_binding_2.f90 -O0 execution test > > > Running /safe/sgk/gcc/gccx/gcc/testsuite/gfortran.dg/debug/debug.exp ... > > > Running /safe/sgk/gcc/gccx/gcc/testsuite/gfortran.dg/dg.exp ... > > > FAIL: gfortran.dg/ISO_Fortran_binding_2.f90 -O2 execution test > > > FAIL: gfortran.dg/ISO_Fortran_binding_2.f90 -O3 -fomit-frame-pointer > > > -funroll-loops -fpeel-loops -ftracer -finline-functions execution test > > > FAIL: gfortran.dg/ISO_Fortran_binding_2.f90 -O3 -g execution test > > > > > > > Regression testing finished faster than I thought. Doing > > > > % gmake check-fortran RUNTESTFLAGS="dg.exp=ISO_Fortran_binding_2.f90" > > ... > > === gfortran Summary === > > > > # of expected passes 8 > > # of unexpected failures 4 > > > > The first failure in the gfortran.log file is > > > > CFI_address: subscripts[0], is out of bounds. dv->dim[0].extent = 3 > > subscripts[0] = 3. > > CFI_address: subscripts[0], is out of bounds. dv->dim[0].extent = 3 > > subscripts[0] = -1. > > CFI_address: base address of C Descriptor must not be NULL. > > CFI_deallocate: Base address is already NULL. > > CFI_deallocate: C Descriptor must describe a pointer or allocatable object. > > CFI_allocate: Base address of C descriptor must be NULL. > > CFI_allocate: The object of the C descriptor must be a pointer or > > allocatable variable. > > CFI_establish: Rank must be between 0 and 15, 0 < rank (0 !< 16). > > CFI_establish: If the C Descriptor represents an allocatable variable > > (dv->attribute = 1), its base address must be NULL (dv->base_addr = NULL). > > CFI_establish: If base address is not NULL (base_addr != NULL), the > > established C descriptor is for a nonallocatable entity (attribute != 1). > > CFI_is_contiguous: Base address of C Descriptor is already NULL. > > CFI_is_contiguous: C Descriptor must describe an array (0 < dv->rank = 0). > > CFI_section: Base address of source must not be NULL. > > CFI_section: Source must describe an array (0 < source->rank, 0 !< 0). > > CFI_section: Rank of result must be equal to the rank of source minus the > > number of zeros in strides (result->rank = source->rank - zero_count, 1 != > > 1 - 1). > > CFI_section: Lower bounds must be within the bounds of the fortran array > > (source->dim[0].lower_bound <= lower_bounds[0] <= > > source->dim[0].lower_bound + source->dim[0].extent - 1, 0 <= -1 <= 99). > > CFI_section: Lower bounds must be within the bounds of the fortran array > > (source->dim[0].lower_bound <= lower_bo > > unds[0] <= source->dim[0].lower_bound + source->dim[0].extent - 1, 0 <= 100 > > <= 99). > > > > Program received signal SIGSEGV: Segmentation fault - invalid memory > > reference. > > > > Backtrace for this error: > > #0 0x7ffffffff1a2 in ??? > > #1 0x0 in ??? > > > > The 2nd, 3rd, and 4th failures are > > > > CFI_address: subscripts[0], is out of bounds. dv->dim[0].extent = 3 > > subscripts[0] = 3. > > CFI_address: subscripts[0], is out of bounds. dv->dim[0].extent = 3 > > subscripts[0] = -1. > > CFI_address: base address of C Descriptor must not be NULL. > > CFI_deallocate: Base address is already NULL. > > > > Program received signal SIGFPE: Floating-point exception - erroneous > > arithmetic operation. > > > > Backtrace for this error: > > #0 0x7ffffffff1a2 in ??? > > #1 0x400eed in ??? > > #2 0x4021ea in _start > > at /usr/src/lib/csu/amd64/crt1.c:76 > > #3 0x200628fff in ??? > > > > > > -- > > Steve > > > > -- > "If you can't explain it simply, you don't understand it well enough" > - Albert Einstein -- "If you can't explain it simply, you don't understand it well enough" - Albert Einstein
