Function installDebugAgent

src/runtime/context.cpp:879–897

    }

    void installDebugAgent ( DebugAgentPtr newAgent, const char * category, LineInfoArg * at, Context * context ) {
        if ( !category ) context->throw_error_at(at, "need to specify category");
        std::lock_guard<std::recursive_mutex> guard(g_DebugAgentMutex);
        auto it = g_DebugAgents.find(category);
        if ( it != g_DebugAgents.end() ) {
            DebugAgent * oldAgentPtr = it->second.debugAgent.get();
            for_each_debug_agent([&](const DebugAgentPtr & pAgent){
                pAgent->onUninstall(oldAgentPtr);
            });
        }
        g_DebugAgents[category] = {
            debugAgentContextOrNull(context),
            newAgent
        };
        DebugAgent * newAgentPtr = newAgent.get();
        for_each_debug_agent([&](const DebugAgentPtr & pAgent){
            pAgent->onInstall(newAgentPtr);
        });
    }

    Context & getDebugAgentContext ( const char * category, LineInfoArg * at, Context * context ) {
        if ( !category ) context->throw_error_at(at, "need to specify category");