Change formatting of "while" to arg1-body

`while` has no special formatting currently, so it currently attempts to hang the body: ```clojure (def a (atom 10)) (while (pos? @a) (println @a) ;; comment to not put on one line (swap! a dec)) ``` Given that it [works like `when`](https://clojuredocs.org/clojure.core/while), I think it should be formatted like `when` too (flow the body): ```clojure (def a (atom 10)) (while (pos? @a) (println @a) ;; comment to not put on one line (swap! a dec)) ``` Given that `while` isn't used very often, I think this should be a small change overall.