tonsky

(require '[clojure.string :as str])

(defn parse-line [line]
  (let [line (str/replace line #"[\\]\s*(\n\s*|$)" "")]
    (when-not (str/blank? line)
      (let [[k v] (str/split line #"=" 2)]
        [(str/trim k) (when-not (str/blank? v) (str/trim v))]))))

(defn parse [text]
  (let [lines (str/split text #"(?<![\s\\])\s*\n")]

tonsky

(def ^:dynamic chunk-size 17)

(defn next-chunk [rdr]
  (let [buf (char-array chunk-size)
        s   (.read rdr buf)]
    (when (pos? s)
      (java.nio.CharBuffer/wrap buf 0 s))))

(defn chunk-seq [rdr]
  (when-let [chunk (next-chunk rdr)]

tonsky

(ns ini
  (require [clojure.string :as str]
           [clojure.tools.logging :as log])
  (use clojure.test))

(defn read [content]
  (-> content
    (str/replace #"\\\s*($|\n\s*)" "")
    (str/split-lines)))