+ (last (car (last fname)))
+ (method-and-args (dwim-join (mapcar #'(lambda (x) (js-to-strings x (+ start-pos 2)))
+ (m-args form))
+ (- 80 start-pos 2)
+ :start last
+ :end ")"
+ :join-after ","))
+ (ensure-no-newline-before-dot (concatenate 'string
+ (car (last butlast))
+ (first method-and-args))))
+ (nconc (butlast butlast)
+ (list ensure-no-newline-before-dot)
+ (rest method-and-args)))))