clojure.pprint/pprint converts unquote+deref to unquote-splicing

Question

This is very unusual syntax but pretty-printing it does not round-trip.

$ clj -Sforce -Sdeps '{:deps {org.clojure/clojure {:mvn/version "1.11.4"}}}'
Clojure 1.11.4
user=> (require '[clojure.pprint :as pp])
nil
user=> (-> "~ @a" read-string pp/pprint)
~@a
nil
user=> (-> '~ @a)
(clojure.core/unquote (clojure.core/deref a))
user=> (-> '~ @a pp/pprint with-out-str read-string)
(clojure.core/unquote-splicing a)

Answer 1

Logged as https://clojure.atlassian.net/browse/CLJ-2875