From 61663c06d351a7c5cb868840d3c94cb95335b2d6 Mon Sep 17 00:00:00 2001
From: Boris Kolpackov <boris@codesynthesis.com>
Date: Tue, 6 Sep 2011 14:42:43 +0200
Subject: Add support for object pragma

This pragma is used to specify objects in a view declaration.
---
 odb/pragma.hxx | 42 ++++++++++++++++++++++++++----------------
 1 file changed, 26 insertions(+), 16 deletions(-)

(limited to 'odb/pragma.hxx')

diff --git a/odb/pragma.hxx b/odb/pragma.hxx
index 1fc034a..5ff6165 100644
--- a/odb/pragma.hxx
+++ b/odb/pragma.hxx
@@ -17,12 +17,28 @@ struct pragma
 {
   enum mode_type {override, accumulate};
 
+  // Check that the pragma is applicable to the declaration. Return true
+  // on success, complain and return false otherwise.
+  //
+  typedef bool (*check_func) (tree decl,
+                              std::string const& decl_name,
+                              std::string const& prag_name,
+                              location_t);
+
   pragma (mode_type m,
-          std::string const& n,
+          std::string const& pn,
+          std::string const& cn,
           std::string const& v,
-          tree tn,
-          location_t l)
-      : mode (m), name (n), value (v), node (tn), loc (l)
+          tree n,
+          location_t l,
+          check_func c)
+    : mode (m),
+      pragma_name (pn),
+      context_name (cn),
+      value (v),
+      node (n),
+      loc (l),
+      check (c)
   {
   }
 
@@ -30,16 +46,19 @@ struct pragma
   operator< (pragma const& y) const
   {
     if (mode == override)
-      return name < y.name;
+      return pragma_name < y.pragma_name;
     else
-      return name < y.name || (name == y.name && loc < y.loc);
+      return pragma_name < y.pragma_name ||
+        (pragma_name == y.pragma_name && loc < y.loc);
   }
 
   mode_type mode;
-  std::string name;
+  std::string pragma_name;  // Actual pragma name for diagnostics.
+  std::string context_name; // Context entry name.
   std::string value;
   tree node;
   location_t loc;
+  check_func check;
 };
 
 typedef std::vector<pragma> pragma_list;
@@ -88,13 +107,4 @@ extern decl_pragmas decl_pragmas_;
 extern "C" void
 register_odb_pragmas (void*, void*);
 
-// Check that the pragma is applicable to the declaration. Return true
-// on success, complain and return false otherwise.
-//
-bool
-check_decl_type (tree decl,
-                 std::string const& name,
-                 std::string const& prag,
-                 location_t);
-
 #endif // ODB_PRAGMA_HXX
-- 
cgit v1.1