         (->> trace
              mt/entry->string
 println
-             remove-iso-ctrl)
+             t-utils/remove-iso-ctrl)
         => "[31m [1;30;41m-[40m[31m[m[33m [33m|[1;30;43m-[40m[33mcom.billpiel.mem-tracer.test.ns1/func1[m [33m|  [33m:a[0m[m [33m| return =>  [33m|  [33m:a[0m[m[32m [33m|[32m|[1;30;42m-[40m[32mcom.billpiel.mem-tracer.test.ns1/func2[m [33m|[32m|  [33m:a[0m[m [33m|[32m| return =>  [33m|[32m|  [33m:a[0m[m [33m| return =>  [33m|  [33m:a[0m[m")
 
       (fact "remove trace"

(fact-group "exception thrown"

  (mtt/untrace-ns* 'com.billpiel.mem-tracer.test.ns1)
  (with-redefs [mtt/now (mock-now-fn)
                gensym (mock-gensym-fn)]
    (let [trace-root (mt/add-trace-ns! 'com.billpiel.mem-tracer.test.ns1)
          _ (try
              (com.billpiel.mem-tracer.test.ns1/func-throws :a)

(fact-group "about enable/disable -all-traces!"
  (mtt/untrace-ns* 'com.billpiel.mem-tracer.test.ns1)
  (mt/reset-workspace!)
  (with-redefs [mtt/now (t-utils/mock-now-fn)
                gensym (t-utils/mock-gensym-fn)]

    (mt/add-trace-ns! 'com.billpiel.mem-tracer.test.ns1)

