Index: tol/btol/bgrammar/nameblock.cpp
===================================================================
--- tol/btol/bgrammar/nameblock.cpp	(revision 76b9712e3ddfc8f89498346803fa14a4155bf88a)
+++ tol/btol/bgrammar/nameblock.cpp	(revision 5c9c2d746ca74520ea61be2c7457d726d47e054d)
@@ -139,6 +139,7 @@
     return(NULL);
   }
+  
   const BNameBlock* oldNameBlock = BNameBlock::current_;
-  BUserNameBlock* ns_result = new BContensNameBlock;
+  BUserNameBlock* ns_result = new BGraContensP<BNameBlock>(new BNameBlock);
   BNameBlock& newNameBlock  = ns_result->Contens();
   newNameBlock.PutName(fullName);
