Subversion Repositories openrisc

// { dg-do run }

// { dg-options "-fipa-pta -fnon-call-exceptions" }

struct Mutex

{

  bool locked;

  ~Mutex ()

  {

    if (locked)

      throw 0;

  }

  void lock ()

  {

    locked = true;

  }

  void unlock ()

  {

    if (!locked)

      throw 0;

    locked = false;

  }

};

struct lock_guard

{

  Mutex *m;

  lock_guard (Mutex *m) : m(m)

  {

  }

  ~lock_guard ()

  {

    m->unlock ();

  }

};

int

main ()

{

  Mutex m;

  m.lock ();

  try

  {

    lock_guard l (&m);

  }

  catch ( ...)

  {

    __builtin_abort ();

  }

  return 0;

}