(use-modules (statprof)
             (ice-9 time)
             (guix)
             ((gnu packages) #:select (all-packages))
             ((guix scripts build) #:select (dependents))
             (gnu packages version-control))

(time (->bool (all-packages)))                    ;warm up

(with-store store
  (statprof
   (lambda ()
     (dependents store (list libgit2) 1))
   #:full-stacks? #t
   #:display-style 'tree))