BUG: Hopefully fix problem on the SUN. On SunOS ulimit -a for fd is /only/ 256 and...

[gdcm.git] / Testing / TestVR.cxx

diff --git a/Testing/TestVR.cxx b/Testing/TestVR.cxx
index 1b7b047213c72da258aaca92401333e5b23c4247..36710c63685b81c70ea15c84e227f1b1330b577a 100644 (file)
--- a/Testing/TestVR.cxx
+++ b/Testing/TestVR.cxx
@@ -3,8 +3,8 @@
   Program:   gdcm
   Module:    $RCSfile: TestVR.cxx,v $
   Language:  C++
-  Date:      $Date: 2005/01/27 10:43:19 $
-  Version:   $Revision: 1.5 $
+  Date:      $Date: 2005/02/02 10:05:26 $
+  Version:   $Revision: 1.7 $
                                                                                 
   Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
   l'Image). All rights reserved. See Doc/License.txt or
@@ -31,7 +31,7 @@ int TestVR(int , char *[])
 
    gdcm::VR *vr = new gdcm::VR();
  
-   // There should be 16 entries
+   // There should be 16 entries ...
    vr->Print( std::cout );
 
    vr->IsVROfStringRepresentable( "PN" );
@@ -41,6 +41,7 @@ int TestVR(int , char *[])
    vr->IsVROfBinaryRepresentable( "PN" );
 
    vr->IsVROfSequence( "" );
-
+   vr->IsVROfSequence( "SQ" );
+   delete vr;
    return 0;
 }