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 143 "../../lib/Storable.pm (autosplit into ../../lib/auto/Storable/store.al)" | |
7 | # | |
8 | # store | |
9 | # | |
10 | # Store target object hierarchy, identified by a reference to its root. | |
11 | # The stored object tree may later be retrieved to memory via retrieve. | |
12 | # Returns undef if an I/O error occurred, in which case the file is | |
13 | # removed. | |
14 | # | |
15 | sub store { | |
16 | return _store(\&pstore, @_, 0); | |
17 | } | |
18 | ||
19 | # end of Storable::store | |
20 | 1; |