--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/stdcpp/tsrc/Stdcpp_test/stlport/auto/stlport_great/src/greateq.cpp	Tue Feb 02 02:01:42 2010 +0200
@@ -0,0 +1,35 @@
+
+// STLport regression testsuite component.
+// To compile as a separate example, please #define MAIN.
+
+#include <iostream>
+#include <algorithm>
+#include <functional>
+
+#ifdef MAIN
+#define greateq_test main
+#endif
+
+#if !defined (STLPORT) || defined(__STL_USE_NAMESPACES)
+using namespace std;
+#endif
+int greateq_test(int, char**)
+{
+	cout<<"Results of greateq_test:"<<endl;
+	int array [4] = { 3, 1, 4, 2 };
+	int res_arr[4] = { 4, 3, 2 ,1};
+
+	int failures = 0;
+	sort(array, array + 4, greater_equal<int>());
+	for(int i = 0; i < 4; i++)
+	{
+		cout << array[i] << endl;
+		if(array[i] != res_arr[i])
+			failures++;
+	}
+
+	if (!failures)
+	return 0;
+	else
+	return 1;
+}