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