 
 (declare lex* string->ast ast->groups)
 
-(defn start-of-new-token? [^String s ^Integer i]  
+(defn start-of-new-token? [s i]
   (let [c (.charAt s i)
         nc (try
              (.charAt s (inc i))

(defn render-file [filename context]
  (-> filename
      load-template
      (render context)))

       rest-tokens]
      (throw (Exception. (str "parsing error after " a))))))

(defn find-close-tag [tokens]
  (let [[a b c & rest-tokens] tokens]
    (if (and (= (:token a) :open-tag)
             (string? (:token b))
