 (fact-group "long values display nicely"
   (mtt/untrace-ns* 'com.billpiel.mem-tracer.test.ns1)
   (mt/reset-workspace!)
-  (with-redefs [mtt/now (mock-now-fn)
-                gensym (mock-gensym-fn)]
+  (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)
     (com.billpiel.mem-tracer.test.ns1/func-identity {:a 1

  (mtt/untrace-ns* 'com.billpiel.mem-tracer.test.ns1)
  (mt/clear-log!)
  (mt/reset-workspace!)
  (with-redefs [mtt/now (mock-now-fn)
                gensym (mock-gensym-fn)]
    (let [trace-root (mt/add-trace-ns! 'com.billpiel.mem-tracer.test.ns1)
          _ (com.billpiel.mem-tracer.test.ns1/func3-1 3 8)
          trace (mt/deref-workspace!)]

  (mtt/untrace-ns* 'com.billpiel.mem-tracer.test.ns1)
  (mt/clear-log!)
  (mt/reset-workspace!)
  (with-redefs [mtt/now (t-utils/mock-now-fn)
                gensym (t-utils/mock-gensym-fn)]
    (let [trace-root (mt/add-trace-ns! 'com.billpiel.mem-tracer.test.ns1)
          _ (com.billpiel.mem-tracer.test.ns1/func3-1 3 8)
          trace (mt/deref-workspace!)]
