// 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;
}