Add JOURNAL_ADD_TYPE_INTERNAL_TRACKED, ab internal type that is tracked by...

Add JOURNAL_ADD_TYPE_INTERNAL_TRACKED,  ab internal type that is tracked by the name book at all time

Journal/JournalCppDefs.hh

@@ -328,6 +328,18 @@ template <typename T> Data define_in_language(Stream& _strm, const T& _arg)
   JOURNAL_TYPE_NAME(TYPE); \
   template <> Data define(Stream&, TYPE const&) { return Data(); }
 
+// an internal type that is tracked by the name book at all time
+#define JOURNAL_ADD_TYPE_INTERNAL_TRACKED(TYPE, VRBL) \
+  JOURNAL_ADD_TYPE_INTERNAL(TYPE); \
+  template <> Data define(Stream& _strm, TYPE* const& VRBL) \
+  { \
+    return Data(_strm.retrieve_unique_name(key(VRBL))); \
+  } \
+  template <> Data define(Stream& _strm, TYPE const* const& VRBL) \
+  { \
+    return Data(_strm.retrieve_unique_name(key(VRBL))); \
+  } 
+
 #define JOURNAL_ADD_TYPE_EXTERNAL(TYPE, VRBL) \
   JOURNAL_TYPE_NAME(TYPE); \
   template <> Data define(Stream& _strm, TYPE* const& VRBL) \