-/** Construct object from archive_node. */
-fail::fail(const archive_node &n, const lst &sym_lst) : inherited(n, sym_lst)
-{
- debugmsg("fail constructor from archive_node", LOGLEVEL_CONSTRUCT);
-}
-
-/** Unarchive the object. */
-ex fail::unarchive(const archive_node &n, const lst &sym_lst)
-{
- return (new fail(n, sym_lst))->setflag(status_flags::dynallocated);
-}
-
-/** Archive the object. */
-void fail::archive(archive_node &n) const
-{
- inherited::archive(n);
-}