[OpenSPARC-T2-DV] / tools / perl-5.8.0 / lib / 5.8.0 / sun4-solaris / auto / Storable / retrieve.al

# NOTE: Derived from ../../lib/Storable.pm.
# Changes made here will be lost when autosplit is run again.
# See AutoSplit.pm.
package Storable;

#line 288 "../../lib/Storable.pm (autosplit into ../../lib/auto/Storable/retrieve.al)"
#
# retrieve
#
# Retrieve object hierarchy from disk, returning a reference to the root
# object of that tree.
#
sub retrieve {
	_retrieve($_[0], 0);
}

# end of Storable::retrieve
1;
Commit	Line	Data
86530b38 AT	1	# NOTE: Derived from ../../lib/Storable.pm.
	2	# Changes made here will be lost when autosplit is run again.
	3	# See AutoSplit.pm.
	4	package Storable;
	5
	6	#line 288 "../../lib/Storable.pm (autosplit into ../../lib/auto/Storable/retrieve.al)"
	7	#
	8	# retrieve
	9	#
	10	# Retrieve object hierarchy from disk, returning a reference to the root
	11	# object of that tree.
	12	#
	13	sub retrieve {
	14	_retrieve($_[0], 0);
	15	}
	16
	17	# end of Storable::retrieve
	18	1;