Skip to content
Snippets Groups Projects
Commit 195280ef authored by Antoine Merle's avatar Antoine Merle Committed by Cristian Galperti
Browse files

Handle all :mem_%%% or :stat_%%% subnodes, fix bug with order

parent 6dd7e497
No related branches found
No related tags found
No related merge requests found
......@@ -2,26 +2,26 @@
FUN PUBLIC rtc_make_dict(_type, optional _inode, optional _ithread)
{
_thread = present(_ithread) ? iii(_ithread,2) : "%%";
_node = present(_inode ) ? iii(_inode ,2) : "%%";
_nodestr= ($SHOT>65700 || $SHOT==-1) ? "node" : "tcvrt";
_base = "\\rtc::top."//_nodestr//_node//".thread"//_thread//"."//_type//"s:"//_type//"_%%%";
/* write(*,"[rtc_make_dict] base="//_base); */
_thread = present(_ithread) ? ".thread"//iii(_ithread,2) : "";
_node = present(_inode ) ? "."//_nodestr//iii(_inode,2) : "";
_base = "\\rtc::top"//_node//_thread//"***:"//_type//"_%%%";
write(*,"[rtc_make_dict] base="//_base);
_nids = TreeFindNodeWild(_base);
_path = getnci(_nids,"PATH");
if (size(_path)>0)
{
_len = getnci(_path//":raw","LENGTH");
_len = getnci(adjustl(adjustr(_path)//":raw"),"LENGTH");
_path = pack(_path,_len>0);
}
if (size(_path)>0)
{
_name = getnci(_path//":name","record");
_order = sort(_name) : *;
_name = getnci(adjustl(adjustr(_path)//":name"),"record");
_order = sort(_name);
_dict = MAKE_SIGNAL(_path[_order],*,_name[_order]);
}
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment