(ns repro
  (:require [clojure.tools.analyzer.jvm :as ana-jvm]))

(defrecord MyRecord [form])

(prn :hash-code/before (.hashCode MyRecord))

(do
  (let [form '(defrecord MyRecord [form])]
    (ana-jvm/analyze form (ana-jvm/empty-env) {}))
  :analyzed)

(prn :hash-code/after (.hashCode MyRecord))