                     in-data-arg
                     (condp (fn [^String v ^String s] (.startsWith s v)) scenario
                       "no-op" 1
+                      "busy-sleep" [100 100 100 100]
                       "factorial" 300N
                       "opennlp-single" "This is a simple sentence."
                       "opennlp-multi" (str

                    (cond
                      (.endsWith scenario "-direct")
                        (let [proc-fn (condp = scenario
                                        "pcap-clj-map-direct" (create-proc-fn sample-pcap-processing-definition-clj-map)
                                        "pcap-java-map-direct" (create-proc-fn sample-pcap-processing-definition-java-map)
                                        "pcap-json-direct" (create-proc-fn sample-pcap-processing-definition-json)
                                        "opennlp-single-direct" opennlp-single-sentence-direct-test-fn
                                        "opennlp-multi-direct" opennlp-multi-sentence-direct-test-fn
                                        "factorial-direct" factorial
                                        nil)]
                          (fn []
                            (proc-fn in-data)

      [experiment-helper :refer :all]
      [local-data-processing-pipeline :refer :all]))
  (:import
    (dsbdp Counter ExperimentHelper ProcessingLoop)
    (java.lang.management ManagementFactory ThreadInfo ThreadMXBean)
    (java.util HashMap Map))
  (:gen-class))
