[H5r-commits] r23 - tests

[noreply at r-forge.r-project.org]

Author: extemporaneousb
Date: 2010-05-13 19:41:41 +0200 (Thu, 13 May 2010)
New Revision: 23

Modified:
   tests/testall.R
Log:


Modified: tests/testall.R
===================================================================
--- tests/testall.R	2010-05-12 23:54:20 UTC (rev 22)
+++ tests/testall.R	2010-05-13 17:41:41 UTC (rev 23)
@@ -169,6 +169,16 @@
   all.equal(a,b)
 })
 
+
+TH("list attributes, file", {
+  length(listH5Contents(f)) == 13
+})
+
+TH("list attributes, group", {
+  length(listH5Contents(g)) == 10
+})
+
+
 TH(action = "print")
 TH(action = "throw")