                     (= \; c)
                     (= \\ c)
                     :else
-                      (recur (inc offset) line (inc col) parents accumulated-state)))))))))
+                      (recur (inc offset) line (inc col) parents accumulated-state))
+                      )))))))
 	          
 (comment
 (defn parse-lib 

                      (recur (inc offset) (inc line) (int 0) (pop parents) accumulated-state)
                    :else
                      (recur (inc offset) line (inc col) parents accumulated-state))
                \\
                  (cond   ; leaved as a template if new cases have to be handled
                    #_(*opening-brackets* c)
                    #_(*closing-brackets* c)
                    #_(= (first "\r") c)
                    #_(= \newline c)
                    #_(= \" c)
                    #_(= \; c)
                    ; TODO refactor the following stuff. or keep for performance ? (bleh)
                    (start-like (.substring text (-> parents peek :offset)) "\\newline")
                      (if (< (inc (- offset (-> parents peek :offset))) (.length "\\newline"))

(def *brackets* {\( \) \{ \} \[ \]})
(def *opening-brackets* (set (keys *brackets*)))
(def *closing-brackets* (set (vals *brackets*)))
(def *spaces* #{\space \tab \newline \return})

(defn 
  start-like
