Feature: String with metadata mode about cljs-devtools HOT 4 OPEN

Perhaps this could result in a better enable-console-print!

from cljs-devtools.

I had no time to look into this yet. I believe you could achieve something similar with String object instead of using just plain js strings. The String object should be able to hold cljs metadata and should be presented as string in standard consoles.

Try something like this (from top of my head):

(specify! (js/String. (pr-str data)) IMeta (-meta [_] data)))))

from cljs-devtools.

That partially solves the "string with metadata" issue.

cljs.user=> 
(defn data-str [data]
  (binding [*print-level* 3 *print-length* 5]
    (specify! (js/String. (pr-str data)) IMeta (-meta [_] data))))

cljs.user=> (data-str {:a (range 10)})
#object[String {:a (0 1 2 3 4 ...)}]

cljs.user=> (meta (data-str {:a (range 10)}))
{:a (0 1 2 3 4 5 6 7 8 9)}

But the console output associated with String objects isn't what we were hoping for...

Test: Just console.log(new String("I am a string")) in Chrome console (no cljs devtools)

Test: Just (js/console.log (js/String. "I am a string")) in metro bundler log

Test: Just (js/console.log (data-str {:a (range 10)})) in metro bundler log

Test: Just (js/console.log (data-str {:a (range 10)})) in chrome console with cljs devtools

from cljs-devtools.

This is the best I've come up with

(defn log-data [& data]
  (binding [*print-level* 3 *print-length* 5]
    (let [s (apply pr-str data)
          d (specify! #js [] IMeta (-meta [_] data))]
      (js/console.log s d))))

(log-data :this {:is "a" :test (range 100)})

It looks fine from a metro bundler terminal.

LOG :this {:is "a", :test (0 1 2 3 4 ...)} []

I suspect cljs-devtools could be made to handle the "array with meta" better.

Still a bit ugly from console without devtools...

from cljs-devtools.