TAO/tests/Bug_2201_Regression/test.cpp

   1 #include "ace/Log_Msg.h"
   2 #include "TestDataC.h"
   3
   4 int
   5 ACE_TMAIN(int argc, ACE_TCHAR *argv[])
   6 {
   7   int retval = 0;
   8
   9   CORBA::ORB_var orb = CORBA::ORB_init (argc, argv);
  10
  11   SeqTest::NodeSeq ns;
  12   ns.length (1);
  13   ns[0].ls.length (1);
  14   ns[0].ls[0] = 42;
  15
  16   ns.length (0); // Shrink sequence
  17   ns.length (1); // Re-grow sequence; should re-initialize meber sequence
  18                  // "as if" default constructed. I.e., the "ls" member
  19                  // should have a length of zero.
  20
  21   if (ns[0].ls.length() == 0) {
  22     ACE_DEBUG ((LM_DEBUG, "Test passed\n"));
  23   }
  24   else {
  25     ACE_ERROR ((LM_ERROR, "Test failed\n"));
  26     retval = 1;
  27   }
  28
  29   orb->destroy ();
  30
  31   return retval;
  32 }