diff src/rlm/println.clj @ 0:78a630e650d2

initial import
author Robert McIntyre <rlm@mit.edu>
date Tue, 18 Oct 2011 00:57:08 -0700
parents
children
line wrap: on
line diff
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/src/rlm/println.clj	Tue Oct 18 00:57:08 2011 -0700
     1.3 @@ -0,0 +1,16 @@
     1.4 +(ns rlm.println)
     1.5 +
     1.6 +
     1.7 +(def println-repl (bound-fn [& args] (apply println args)))
     1.8 +
     1.9 +
    1.10 +
    1.11 +(defn println-terminal [& more]
    1.12 +     (.println System/out (apply str more)))
    1.13 +
    1.14 +
    1.15 +(defmacro print-to-repl [& forms]
    1.16 +  `(binding [clojure.core/*out*
    1.17 +	     (java.io.PrintWriter. (clojure.java.io/writer System/out))]
    1.18 +     ~@forms))
    1.19 +