;;;; A vector of the wrong length for the pattern. Four names, three forms.
(defmacro do-grid [[r rows c cols] & body]
  `(dotimes [~r ~rows] (dotimes [~c ~cols] ~@body)))

(defn main [] i32
  (do-grid [i 2 j] (println "never"))
  0)