Как программно получить стек вызовов?

[driller]

В 3-ке в Global был такое метод:

static void callStack2infolog(str _prefix = "@SYS65092")
{
    container               stack = xSession::xppCallStack();
    counter                 n;
    TreeNodePath            stackPath;
    int                     line;
    ;
    setPrefix(_prefix);
    for (n = 3; n <= conLen(stack); n += 2)
    {
        stackPath = conPeek(stack,n);
        line      = conPeek(stack,n+1);

        if (line)
        {
            info(strfmt("%1 %2", stackPath, line),'', SysInfoAction_Editor::newLineColumn(stackPath, line));
        }
        else
        {
            info(strfmt("%1", stackPath));
        }

    }
}

@SYS65092 = Стек вызовов