direct-field-access.txt

cljs.user=> (set! *print-fn-bodies* true)
true
cljs.user=> (defrecord Foo [x])
cljs.user/Foo
cljs.user=> (defn bar [^cljs.user/Foo foo] #(:y foo))
#'cljs.user/bar
cljs.user=> (bar (assoc (->Foo 1) :y 3))
#object[Function "function (){
return new cljs.core.Keyword(null,"y","y",-1757859776).cljs$core$IFn$_invoke$arity$1(foo);
}"]
cljs.user=> (defn quux [^cljs.user/Foo foo] #(:x foo))
#'cljs.user/quux
cljs.user=> (quux (assoc (->Foo 1) :y 3))
#object[Function "function (){
return foo.x;
}"]