Subversion Repositories openrisc

// { dg-do assemble  }

// Gives ICE on EGCS release branch as of 98/06/08 on i686-pc-linux-gnulibc1)

// From: Klaus-Georg Adams 

// Message-Id: <199806081358.PAA02505@achibm5.chemie.uni-karlsruhe.de>

#include 

#include 

#include 

#include 

using namespace std;

int main()

{

      list l;

      l.push_back(1);

      l.push_back(2);

      list::iterator it =

              find_if( l.begin(), l.end(),

                       // This is a typo, it should be bind2nd, but an

                       // ICE is not a very helpful diagnostic!

                       binder2nd( equal_to(), 2 ) ); // { dg-error "" }

      assert( *(it) == 2 );

}