Initial commit of OpenSPARC T2 architecture model.
[OpenSPARC-T2-SAM] / sam-t2 / devtools / v9 / lib / perl5 / 5.8.8 / sun4-solaris-64-ld / auto / Storable / lock_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 306 "../../lib/Storable.pm (autosplit into ../../lib/auto/Storable/lock_retrieve.al)"
#
# lock_retrieve
#
# Same as retrieve, but with advisory locking.
#
sub lock_retrieve {
_retrieve($_[0], 1);
}
# end of Storable::lock_retrieve
1;