some problems with gcc/testsuite/gfortran.dg/ tests in 4.3-20061111 with OSX 10.3

[Paul Thomas]

Dominique,
> The file gcc/testsuite/gfortran.dg/actual_array_interface_1.f90 in the 
> latest 4.3 snashot (20061111) is empty, as well as:
Yup! I agree.  Sorry about that.  I have attached the full patch and the 
straight up version of the testcase.  I even checked that it still works 
:-)

I cannot do anything about this until the weekend, at earliest.  If 
anybody else is doing a commit and has the time or inclination, please 
include this missing testcase.
>
> without using any CPU time. Note that the problem disappears if I remove 
> the PRINT's in the functions SUB and BAR.
The code for sub is:

sub (__result, .__result, i)
{
  int4 ..__result;
  int4 stride.8;
  int4 offset.9;
  int4 size.10;
  char[0:D.1048][1:..__result] * __result.0;
  bit_size_type D.1046;
  <unnamed type> D.1047;
  int4 D.1048;
  bit_size_type D.1049;
  <unnamed type> D.1050;

  ..__result = *i;
  {
    int4 D.1045;

    ..__result = *i;
    D.1045 = __result->dim[0].stride;
    stride.8 = D.1045 == 0 ? 1 : D.1045;
    __result.0 = (char[0:D.1048][1:..__result] *) __result->data;
    size.10 = NON_LVALUE_EXPR <stride.8>;
    offset.9 = -stride.8;
    D.1046 = (bit_size_type) (<unnamed type>) ..__result * 8;
    D.1047 = (<unnamed type>) ..__result;
    D.1048 = size.10 - 1;
    D.1049 = SAVE_EXPR <D.1046> * (bit_size_type) (<unnamed type>) size.10;
    D.1050 = SAVE_EXPR <D.1047> * (<unnamed type>) size.10;
  }
  {
    struct __st_parameter_dt dt_parm.7;

    dt_parm.7.common.filename = "intrinsic_actual_2.f90";
    dt_parm.7.common.line = 24;
    dt_parm.7.common.unit = 6;
    dt_parm.7.common.flags = 128;
    _gfortran_st_write (&dt_parm.7);
    {
      int4 D.1044;

      D.1044 = ..__result;
      _gfortran_transfer_integer (&dt_parm.7, &D.1044, 4);
    }
    _gfortran_st_write_done (&dt_parm.7);
  }
}

which looks OK apart from the repetition of ..__result = *i;  However, I 
can see nothing that would make the program hang - can anybody else?

Thanks

Paul
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: actual_array_interface_1.f90
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20061114/27f590ac/attachment.f90>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: pr29490.diff
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20061114/27f590ac/attachment.ksh>