// STLport regression testsuite component.
// To compile as a separate example, please #define MAIN.

#include <iostream>
#include <algorithm>
#include <functional>

#ifdef MAIN
#define equalto_test main
#endif


#if !defined (STLPORT) || defined(__STL_USE_NAMESPACES)
using namespace std;
#endif
int equalto_test(int, char**)
{
	cout<<"Results of equalto_test:"<<endl;
	int input1 [4] = { 1, 7, 2, 2 };
	int input2 [4] = { 1, 6, 2, 3 };
	int res_arr[4] = { 1, 0, 1, 0 };
	int failures = 0;

	int output [4];
	transform((int*)input1, (int*)input1 + 4, (int*)input2, (int*)output, equal_to<int>());
	for(int i = 0; i < 4; i++)
	{
		cout << output[i] << endl;
		if (output[i] != res_arr[i])
			failures++;
	}

	if(!failures)
    return 0;
  else
    return 1;
}