Allow a model history parent to be set.

src/sbml/SBase.cpp

@@ -2362,6 +2362,7 @@ SBase::setModelHistory(ModelHistory * history)
     {
       delete mHistory;
       mHistory = static_cast<ModelHistory*>(history->clone());
+      mHistory->setParentSBMLObject(this);
       mHistoryChanged = true;
       status = LIBSBML_OPERATION_SUCCESS;
     }

src/sbml/annotation/ModelHistory.cpp

@@ -486,8 +486,6 @@ ModelHistory::resetModifiedFlags()
 }
 /** @endcond */
 
-/** @cond doxygenLibsbmlInternal */
-
 const SBase * 
 ModelHistory::getParentSBMLObject() const
 {
@@ -516,8 +514,6 @@ ModelHistory::unsetParentSBMLObject()
   return LIBSBML_OPERATION_SUCCESS;
 }
 
-/** @endcond */
-
 
 #endif /* __cplusplus */
 

src/sbml/annotation/ModelHistory.h

@@ -382,17 +382,29 @@ class LIBSBML_EXTERN ModelHistory
 
   /** @endcond */
 
-
-protected:
-  /** @cond doxygenLibsbmlInternal */
-
-  // record the SBML Object on which this ModelHistory is set
-
+  /**
+   * Return the parent object of this ModelHistory.
+   */
   const SBase * getParentSBMLObject() const;
+
+  /**
+   * Returns whether the parent object of this ModelHistory has been set (true), or is NULL (false).
+   */
   bool isSetParentSBMLObject() const;
+
+  /**
+   * Sets the parent object of this ModelHistory.
+   */
   void setParentSBMLObject(const SBase * sb);
+
+  /**
+   * Sets the parent object of this ModelHistory to NULL.
+   */
   int unsetParentSBMLObject();
 
+protected:
+  /** @cond doxygenLibsbmlInternal */
+
   friend class RDFAnnotationParser;
   friend class SBase;