Exacct/Object/Object.xs

2  * Copyright (c) 2002, 2003, Oracle and/or its affiliates. All rights reserved.
18  * ea_object_t part.  If the perl_obj part is not null and the Object is an
21  * be copied, and the list of Objects it contains will be recursively copied.
29 	/* Get the source xs_ea_object_t and make a new one. */
57 	 * and recursively copy each Item individually.
75 		/* Create a new AV and copy across into it. */
91 		/* Create a new AV and tie the filled AV to it. */
100 	/* Wrap the new xs_ea_object_t in a blessed RV and return it.  */
111  * object is embedded, the embedded part will be unpacked and stored in the
113  * wrapped in the corresponding perl structure and stored in a tied perl array.
155 		/* Create a new AV and tie the filled AV to it. */
176  # Define the stash pointers if required and create and populate @_Constants.
263 		 * For embedded objects and Groups, return a ref to the perl SV.
355 	 * Because both libexacct and perl know about the ea_object_t, we have
358 	 * the object is a Group and there is an active perl_obj chain, we will
389 	/* Create a new xs_ea_object_t and subsiduary structures. */
432 		 * The ea_obj part is initially empty, and will be populated
479 	/* Create a new xs_ea_object_t and subsiduary structures. */
488 	/* Create a new AV and copy in all the passed Items. */
501 	/* Bless the copied AV and tie it to a new AV */
514  # each hash value as a scalar, and should be used when it is known the group
515  # does not contain duplicate catalog tags, and as_hashlist wich stores each
516  # hash value as an array of values, and can therefore be used when the group
538 	/* Find the AV underlying the tie and create the new HV. */
602 			 * For embedded objects and Groups, return a ref