loading
open in
main.clj
1
2
3
4
5
6
7
8
9
10
11
12
; A REPL implemented using the Y Combinator program
; hit run and eval some clojure code e.g. (* 6 7)
(((fn [f]
  ((fn [x]
    (x x))
  (fn [x]
    (f (fn [y]
      ((x x) y))))))
(fn [loop]
  (fn [n]
    (loop (println (eval (read))))))) nil)
Clojure 1.8.0 Java HotSpot(TM) 64-Bit Server VM 1.8.0_91-b14