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