Note that the last form in the repro below does not emit a diagnostic, while the previous does:
`
$ clj -Srepro -m cljs.main
cljs.user=> (defn- foo [])
'cljs.user/foo
cljs.user=> (ns bar.core)
bar.core=> (defn baz ([] (cljs.user/foo)))
WARNING: var: cljs.user/foo is not public at line 1
'bar.core/baz
bar.core=> (defn quux ([] (cljs.user/foo)) ([x] (cljs.user/foo)))
'bar.core/quux
bar.core=>
`