 
 (defmethod toString String [x]
   x)
+
+(defmethod toString clojure.lang.Keyword [x]
+  (name x))
 
 (defmethod toString ClassOrInterfaceDeclaration [x]
   (getQName x))

    ""
    (str
      (padStr (first values) (first lengths))
      (rowStr (rest lengths) (rest values)))))

(defn sum [v]
  (apply + v))

(defn separatorStr [lengths]
  (let [n (sum lengths)]
    (clojure.string/join (repeat n "-"))))

(defn printTable [headers results]

  (if (= ind 0)
    (first l)
    (getN (rest l) (- ind 1))))

(def columnSeparator " | ")

(defn columnLength [headerStr resultsStrs ind]
  (max
