Subversion Repositories openrisc_me

/* This failed on s390x due to bug in loop.c.

   loop.c failed to remove a REG_EQUAL note when

   hoisting an insn from a loop body.  */

/* { dg-options "-O3 -fPIC" } */

/* { dg-do run { target fpic } } */

typedef __SIZE_TYPE__ size_t;

int memcmp(const void *s1, const void *s2, size_t n);

typedef struct

{

  char name[30];

  int a;

} LOCAL;

int global = 0;

int sy = 1;

int subroutine_offset;

LOCAL local = { "local", 0 };

LOCAL keywords = { "keywords", 1 };

int local_table = 0;

int keywords_table = 0;

void __attribute__((noinline)) bar (char *p_buffer)

{

  p_buffer[255] = 1;

}

int __attribute__((noinline)) foo (char *p_str1)

{

  global = 1;

  return 1;

}

int __attribute__((noinline)) loop_next (int *p_table, char *p_table_head)

{

  static loop_next = 0;

  if (loop_next == 1)

    return 1;

  loop_next = 1;

  return 0;

}

int

main ()

{

  char buffer[256];

  int ende = 0;

  int index;

  int local_base = 2;

  keywords.a = 1;

  for (sy = 0;; sy++)

    {

      for (index = 1;;)

        {

          bar (buffer);

          if (buffer[sy] != 0)

            {

              ende = 1;

              break;

            };

          if (foo (buffer))

            {

              keywords.a += index - 1;

              break;

            }

          index++;

        }

      if (ende)

        break;

    }

  subroutine_offset = 0;

  for (;;)

    {

      if (loop_next (&keywords_table, (char*)&keywords))

        break;

      if ((!memcmp (keywords.name, "+++", 3)))

        local_base = 100;

      else

        local_base = 0;

      if ((!memcmp (keywords.name, "+++", 3)))

        subroutine_offset += local_table;

      for (;;)

        {

          if (loop_next (&local_table, (char*)&local))

            break;;

          if ((local.a == 0))

            continue;;

          foo (local.name);

        }

    }

  return 0;

}