     {:dot-action ::call :target target :method (munge meth) :args args}
     {:dot-action ::call :target target :method (munge (first meth)) :args args}))
 
-;; (.m o 1 2)
 ;; (. o m 1 2)
 (defmethod build-dot-form [::symbol ::symbol ::list]
   [[target meth args]]
   (build-method-call target meth args))
 
-;; (.m o)
 ;; (. o m)
 (defmethod build-dot-form [::symbol ::symbol ()]
   [[target meth args]]

  [[target meth _]]
  (build-method-call target meth ()))

;; (.m (f _) 1 2)
(defmethod build-dot-form [::list ::symbol ::list]
  [[target meth args]]
  (build-method-call target meth args))

          (print (str "catch (" name "){"))
          (when catch
            (let [{:keys [statements ret]} catch]
              (emit-block subcontext statements ret)))
          (print "}"))
        (when finally
          (let [{:keys [statements ret]} finally]
