[ create a new paste ] login | about

Link: http://codepad.org/y5Tny1CX    [ raw code | fork ]

Scheme, pasted on Dec 30:
1
2
3
(defn lines 
  [s] (let [l (line-seq (java.io.BufferedReader. (java.io.StringReader. s)))]
	 (filter #(not (= "" %1)) (map #(.trim %1) l))))


Create a new paste based on this one


Comments: