------- Comment #6 from mikael at gcc dot gnu dot org  2008-12-22 18:54 -------
(In reply to comment #5)
Generated code:

get_unit_set_ch (struct varying_string * separator)
{
  if (separator->chars.data != 0B)
    {
      __builtin_free (separator->chars.data);
    }
  separator->chars.data = 0B;
}


test_iso ()
{
  static integer(kind=4) options.0[8] = {68, 255, 0, 0, 0, 1, 0, 1};
  static void get_unit_set_ch (struct varying_string *);

  _gfortran_set_options (8, (void *) &options.0);
  get_unit_set_ch (0B);
}


-- 


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

Reply via email to