Fuse injected probes

[fikovnik]

If you want to get some extra performance, you could fuse these:

        if (.Call(list(name = "instrumentr_is_tracing_enabled", 
            address = <pointer: 0x55d9b91f65b0>, dll = list(name = "instrumentr", 
                path = "/mnt/nvme0/R/project-evalR/library/4.0/instrumentr/libs/instrumentr.so", 
                dynamicLookup = FALSE, handle = <pointer: 0x55d9b82baff0>, 
                info = <pointer: 0x55d9b5b45790>), numParameters = 0L))) {
            .Call(list(name = "instrumentr_disable_tracing", 
                address = <pointer: 0x55d9b8202f80>, dll = list(
                  name = "instrumentr", path = "/mnt/nvme0/R/project-evalR/library/4.0/instrumentr/libs/instrumentr.so", 
                  dynamicLookup = FALSE, handle = <pointer: 0x55d9b82baff0>, 
                  info = <pointer: 0x55d9b5b45790>), numParameters = 0L))
            .Call(list(name = "instrumentr_trace_call_exit", 
                address = <pointer: 0x55d9b935af90>, dll = list(
                  name = "instrumentr", path = "/mnt/nvme0/R/project-evalR/library/4.0/instrumentr/libs/instrumentr.so", 
                  dynamicLookup = FALSE, handle = <pointer: 0x55d9b82baff0>, 
                  info = <pointer: 0x55d9b5b45790>), numParameters = 5L), 
                <pointer: 0x55d9b9dc5c60>, <pointer: 0x55d9ba5a3680>, 
                <pointer: 0x55d9b9504380>, <pointer: 0x55d9b81f12f0>, 
                returnValue(<environment>))
            .Call(list(name = "instrumentr_reinstate_tracing", 
                address = <pointer: 0x55d9b84cf800>, dll = list(
                  name = "instrumentr", path = "/mnt/nvme0/R/project-evalR/library/4.0/instrumentr/libs/instrumentr.so", 
                  dynamicLookup = FALSE, handle = <pointer: 0x55d9b82baff0>, 
                  info = <pointer: 0x55d9b5b45790>), numParameters = 0L))
        }

and this:

    {
        if (.Call(list(name = "instrumentr_is_tracing_enabled", 
            address = <pointer: 0x55d9b91f65b0>, dll = list(name = "instrumentr", 
                path = "/mnt/nvme0/R/project-evalR/library/4.0/instrumentr/libs/instrumentr.so", 
                dynamicLookup = FALSE, handle = <pointer: 0x55d9b82baff0>, 
                info = <pointer: 0x55d9b5b45790>), numParameters = 0L))) {
            .Call(list(name = "instrumentr_disable_tracing", 
                address = <pointer: 0x55d9b8202f80>, dll = list(
                  name = "instrumentr", path = "/mnt/nvme0/R/project-evalR/library/4.0/instrumentr/libs/instrumentr.so", 
                  dynamicLookup = FALSE, handle = <pointer: 0x55d9b82baff0>, 
                  info = <pointer: 0x55d9b5b45790>), numParameters = 0L))
            .Call(list(name = "instrumentr_trace_call_entry", 
                address = <pointer: 0x55d9b823a540>, dll = list(
                  name = "instrumentr", path = "/mnt/nvme0/R/project-evalR/library/4.0/instrumentr/libs/instrumentr.so", 
                  dynamicLookup = FALSE, handle = <pointer: 0x55d9b82baff0>, 
                  info = <pointer: 0x55d9b5b45790>), numParameters = 5L), 
                <pointer: 0x55d9b9dc5c60>, <pointer: 0x55d9ba5a3680>, 
                <pointer: 0x55d9b9504380>, <pointer: 0x55d9b81f12f0>, 
                .Call(list(name = "call_create_call", address = <pointer: 0x55d9b9390f10>, 
                  dll = list(name = "instrumentr", path = "/mnt/nvme0/R/project-evalR/library/4.0/instrumentr/libs/instrumentr.so", 
                    dynamicLookup = FALSE, handle = <pointer: 0x55d9b82baff0>, 
                    info = <pointer: 0x55d9b5b45790>), numParameters = 4L), 
                  <pointer: 0x55d9b81f12f0>, sys.call(), environment(), 
                  sys.nframe()))
            .Call(list(name = "instrumentr_reinstate_tracing", 
                address = <pointer: 0x55d9b84cf800>, dll = list(
                  name = "instrumentr", path = "/mnt/nvme0/R/project-evalR/library/4.0/instrumentr/libs/instrumentr.so", 
                  dynamicLookup = FALSE, handle = <pointer: 0x55d9b82baff0>, 
                  info = <pointer: 0x55d9b5b45790>), numParameters = 0L))
        }
    }

and the like