--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/stdcpp/tsrc/Stdcpp_test/stlport/auto/stlport_trnsfrm/src/trnsfrm2.cpp	Tue Feb 02 02:01:42 2010 +0200
@@ -0,0 +1,43 @@
+ 
+// STLport regression testsuite component.
+// To compile as a separate example, please #define MAIN.
+
+#include <algorithm>
+#include <iostream>
+#include <cstring>
+#include <iterator>
+#include <functional>
+
+#ifdef MAIN 
+#define trnsfrm2_test main
+#endif
+static char map_char(char a_, int b_)
+{
+  return char(a_ + b_);
+}
+
+#if !defined (STLPORT) || defined(__STL_USE_NAMESPACES)
+using namespace std;
+#endif
+int trnsfrm2_test(int, char**)
+{
+  cout<<"Results of trnsfrm2_test:"<<endl;
+
+#if defined (__MVS__)
+int trans[] = {-11, 4, -6, -6, -18, 0, 18, -14, 6, 0, -1, -59};
+#else
+int trans[] = {-4, 4, -6, -6, -10, 0, 10, -6, 6, 0, -1, -77};
+#endif
+  char n[] = "Larry Mullen";
+  char arr[13];
+  const unsigned count = ::strlen(n);
+  ostream_iterator <char> iter(cout);
+  transform(n, n + count, trans, arr, map_char);
+  cout << endl;
+  arr[12]='\0';
+  if(strcmp(arr,"Hello World!"))
+    return 1;
+  else
+    return 0;
+}
+