Support clojure.pprint/simple-dispatch on records

[frenchy64]

Is your feature request related to a problem? Please describe.
Supporting plumatic schema in babashka

This improves how schemas are pretty printed.

Describe the solution you'd like
Support in sci for simple-dispatch in the same way as print-method.

Describe alternatives you've considered
Leaving as-is.

Desired behavior

clj                                                                                                                               ✘ INT 40s
Clojure 1.11.1
user=> (defrecord Foo [])
user.Foo
user=> (require '[clojure.pprint :as pp])
nil
user=> (defmethod pp/simple-dispatch Foo [_] (pp/write-out "PRETTY"))
#object[clojure.lang.MultiFn 0x6075b2d3 "clojure.lang.MultiFn@6075b2d3"]
user=> (pp/pprint (Foo.))
"PRETTY"
nil

Actual behavior

./bb
Babashka v0.8.3-SNAPSHOT REPL.
Use :repl/quit or :repl/exit to quit the REPL.
Clojure rocks, Bash reaches.

user=> (defrecord Foo [])
#'user/Foo
user=> (require '[clojure.pprint :as pp])
nil
user=> (defmethod pp/simple-dispatch Foo [_] (pp/write-out "PRETTY"))
#object[clojure.lang.MultiFn 0x68c9cd26 "clojure.lang.MultiFn@68c9cd26"]
user=> (pp/pprint (Foo.))
{}
nil