wrap File{Storage,Node}

classes.pl

@@ -0,0 +1,15 @@
+(
+['FileStorage',[],'@brief XML/YAML/JSON file storage class that encapsulates all the information necessary for writing or
+reading data to/from a file.'],
+['FileNode',[],'@brief File Storage Node class.
+
+The node is used to store each and every element of the file storage opened for reading. When
+XML/YAML file is read, it is first parsed and stored in the memory as a hierarchical collection of
+nodes. Each node can be a "leaf" that is contain a single number or a string, or be a collection of
+other nodes. There can be named collections (mappings) where each element has a name and it is
+accessed by a name, and ordered collections (sequences) where elements do not have names but rather
+accessed by index. Type of the file node can be determined using FileNode::type method.
+
+Note that file nodes are only used for navigating file storages opened for reading. When a file
+storage is opened for writing, no data is stored in memory after it is written.'],
+);

funclist.pl

@@ -1,4 +1,6 @@
 (
+['FileStorage','getFirstTopLevelNode','@brief Returns the first element of the top-level mapping.
+     @returns The first element of the top-level mapping.',1,'FileNode'],
 ['','batchDistance','@brief naive nearest neighbor finder
 
 see http://en.wikipedia.org/wiki/Nearest_neighbor_search

maint/genlists

@@ -36,6 +36,7 @@ my %force = map +($_=>1), qw(
   cv.batchDistance
   cv.sum
   cv.wrapperEMD
+  cv.FileStorage.getFirstTopLevelNode
   cv.cvtColor
   cv.rectangle
   cv.ellipse2Poly
@@ -81,6 +82,7 @@ my %force = map +($_=>1), qw(
 my %class = map +($_=>1), qw(
   LineSegmentDetector Tracker VideoCapture VideoWriter QRCodeDetector
   CascadeClassifier Subdiv2D TrackerKCF TrackerCSRT TrackerMIL
+  FileNode FileStorage
 );
 my $no_want = qr/^(RNG|RotatedRect)/;