Print Profile to json file

ID:2794338
 
May 31 2022, 2:17 pm (Edited on May 31 2022, 2:45 pm)
This is a nifty little snippet I use to spit out my profile to a json file for future reference. It's also easier to find and read a specific proc call than the built-in profiler.

Enjoy.

world
    Del()
        WriteToProfile()
        ..()

    proc
        BeginProfile()
            Profile(PROFILE_START, "json")
            log << "Profiling World"

        WriteToProfile(profile = "profile")
            fdel("Data/Logs/[profile].json")
            text2file(Profile(PROFILE_REFRESH, "json"), "Data/Logs/[profile].json")

mob/Admin/verb/WriteProfile()
    world.WriteToProfile()