Rename make_dict to rtc_make_dict

mds/tdi/dicts/make_dict.fun → mds/tdi/dicts/rtc_make_dict.fun

 
-FUN PUBLIC make_dict(_type, optional _inode, optional _ithread)
+FUN PUBLIC rtc_make_dict(_type, optional _inode, optional _ithread)
 {
 
   _thread = present(_ithread) ? iii(_ithread,2) : "%%";
@@ -8,7 +8,7 @@ FUN PUBLIC make_dict(_type, optional _inode, optional _ithread)
   _nodestr= ($SHOT>65700 || $SHOT==-1) ? "node" : "tcvrt";
   
   _base   = "\\rtc::top."//_nodestr//_node//".thread"//_thread//"."//_type//"s:"//_type//"_%%%";
-  write(*,"[make_dict] base="//_base);
+  /* write(*,"[rtc_make_dict] base="//_base); */
  
   _nids   = TreeFindNodeWild(_base);
   _path   = getnci(_nids,"PATH");