--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/stdcpp/tsrc/Stdcpp_test/stlport/auto/stlport_setintr/src/setintr2.cpp	Tue Feb 02 02:01:42 2010 +0200
@@ -0,0 +1,57 @@
+
+// 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 setintr2_test main
+#endif
+
+#if !defined (STLPORT) || defined(__STL_USE_NAMESPACES)
+using namespace std;
+#endif
+int setintr2_test(int, char**)
+{
+  int failures=0;
+  cout<<"Results of setintr2_test:"<<endl;
+char* word1 = "ABCDEFGHIJKLMNO";
+char* word2 = "LMNOPQRSTUVWXYZ";
+char word3[5];
+  ostream_iterator <char> iter(cout, " ");
+  cout << "word1: ";
+  
+  if(strcmp(word1,"ABCDEFGHIJKLMNO"))
+    failures++; 
+  
+  copy(word1, word1 + ::strlen(word1), iter);
+  cout << "\nword2: ";
+  
+  if(strcmp(word2,"LMNOPQRSTUVWXYZ"))
+    failures++; 
+
+  
+  copy(word2, word2 + ::strlen(word2), iter);
+  cout << endl;
+  set_intersection(word1, word1 + ::strlen(word1),
+                    word2, word2 + ::strlen(word2),
+                    word3,
+                    less<char>());
+  word3[4]='\0';
+   
+  if(strcmp(word3,"LMNO"))
+     failures++; 
+  
+  copy(word3,word3+ ::strlen(word3),iter);
+  cout << endl;
+  
+  if(failures)
+    return 1;
+  else  
+    return 0;
+}
+