atype.Buffer]
    [:lload 1]
    [:aload 0]
    [:getfield :this "shape2-lsize" :long]
    [:lrem]
    [:invokeinterface tech.v3.datatype.Buffer "readLong"]
    [:ladd]
    [:lreturn]]}]}

user&gt; (def class-obj (insn/define class-def))
#'user/class-obj
user&gt; (def first-constructor (first (.getDeclaredConstructors class-obj)))
#'user/first-constructor
user&gt; (def reversed-idx-obj (.newInstance first-constructor
                                          (gtol/reduced-dims-&gt;constructor-args reduced-d