[Bug fortran/17708] gfortran problem with goto inside loop

[tobi at gcc dot gnu dot org]

------- Additional Comments From tobi at gcc dot gnu dot org  2004-09-28 13:43 -------
t02.original looks like this:
MAIN__ ()
{
  int4 i;

  {
    int4 count.0;

    count.0 = 3;
    i = 1;
    while (1)
      {
        if (count.0 <= 0)
          {
            goto L.2;
          }
        else
          {
            (void) 0;
          }
        _gfortran_filename = "pr17708.f90";
        _gfortran_line = 4;
        _gfortran_ioparm.unit = 6;
        _gfortran_ioparm.list_format = 1;
        _gfortran_st_write ();
        _gfortran_transfer_character (" loop with i =", 14);
        _gfortran_transfer_integer (&i, 4);
        _gfortran_st_write_done ();
        i = i + 1;
        count.0 = count.0 - 1;
      }
    L.2:;
  }
  __label_000010:; <<<<<<<<<<<<<<<<<<<< this is the wrong place
}

-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17708