anchor.diff:               (arg/add-argument! spec '("--run" "-r")
                  :help "Run the compiled code.")
                (arg/add-argument! spec '("--profile" "-p")
  -               :help "Run the compiled code with the profiler.")
  +               :help    "Run the compiled code with the profiler."
  +               :var     "TYPE"
  +               :default "none"
  +               :value   "call"
  +               :narg    "?")
                (arg/add-argument! spec '("--")
                  :name    "script-args"
                  :help    "Arguments to pass to the compiled script."
  
positive.code:                         (logger/put-error! logger "Execution failed.")
                          (print! (traceback/remap-traceback (struct name lines) msg))
                          (exit! 1)])))
           (if (.> args :profile)
             (run-with-profiler exec (struct name lines))
             (exec)))])))
  
  (define task
    (struct
  
negative.code: (import urn/logger logger)
  (import urn/traceback traceback)
  
  (defun profile-calls (fn mappings)
    :hidden
    (let* [(stats (empty-struct))
           (call-stack '())]
  
  