Add name hint to the qualifies edge (cvr-qualification)

2 files changed, 17 insertions, 0 deletions

diff --git a/odb/semantics/derived.cxx b/odb/semantics/derived.cxx
index 14c568a..b6dec2d 100644
--- a/odb/semantics/derived.cxx
+++ b/odb/semantics/derived.cxx
@@ -10,6 +10,7 @@ namespace semantics
 {
   qualifies::
   qualifies ()
+      : hint_ (0)
   {
   }
 
diff --git a/odb/semantics/derived.hxx b/odb/semantics/derived.hxx
index 2860bca..890d752 100644
--- a/odb/semantics/derived.hxx
+++ b/odb/semantics/derived.hxx
@@ -43,6 +43,21 @@ namespace semantics
       return *qualifier_;
     }
 
+    // Name hint of the base type.
+    //
+  public:
+    void
+    hint (names& hint)
+    {
+      hint_ = &hint;
+    }
+
+    names*
+    hint () const
+    {
+      return hint_;
+    }
+
   public:
     qualifies ();
 
@@ -61,6 +76,7 @@ namespace semantics
   protected:
     type_type* type_;
     qualifier_type* qualifier_;
+    names* hint_;
   };
 
   class qualifier: public derived_type