Implement support for database operations callbacks

New object pragma: callback. New test: common/callback. New manual
section: 10.1.4, "callback".

1 files changed, 4 insertions, 2 deletions

diff --git a/odb/relational/source.hxx b/odb/relational/source.hxx
index 4d2f10a..42d0f9b 100644
--- a/odb/relational/source.hxx
+++ b/odb/relational/source.hxx
@@ -2331,9 +2331,11 @@ namespace relational
              << endl
              << "if (l.locked ())"
              << "{"
+             << "callback (db, obj, callback_event::pre_load);"
              << "init (obj, sts.image (), db);"
              << "load_ (sts, obj);"
              << "sts.load_delayed ();"
+             << "callback (db, obj, callback_event::post_load);"
              << "l.unlock ();"
              << "}"
              << "else" << endl
@@ -2367,9 +2369,11 @@ namespace relational
            << endl
            << "if (l.locked ())"
            << "{"
+           << "callback (db, obj, callback_event::pre_load);"
            << "init (obj, sts.image (), db);"
            << "load_ (sts, obj);"
            << "sts.load_delayed ();"
+           << "callback (db, obj, callback_event::post_load);"
            << "l.unlock ();"
            << "}"
            << "else" << endl
@@ -2689,8 +2693,6 @@ namespace relational
         if (embedded_schema)
           os << "#include <odb/schema-catalog-impl.hxx>" << endl;
 
-        os << "#include <odb/details/unused.hxx>" << endl;
-
         if (options.generate_query ())
           os << "#include <odb/details/shared-ptr.hxx>" << endl;