(defmacro m [xs]
             `(doseq [x ~xs]
                (defn (symbol x) []
                  (prn x))))

(m ["f1" "f2" "f3"])

should create the functions f1, f2, f3, each printing its name - but it doesn't of course.