tools/perl-5.8.0/lib/5.8.0/sun4-solaris/auto/Storable/store.al

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

#line 143 "../../lib/Storable.pm (autosplit into ../../lib/auto/Storable/store.al)"
#
# store
#
# Store target object hierarchy, identified by a reference to its root.
# The stored object tree may later be retrieved to memory via retrieve.
# Returns undef if an I/O error occurred, in which case the file is
# removed.
#
sub store {
        return _store(\&pstore, @_, 0);
}

# end of Storable::store
1;