Functional Lisp Hypervisor for Apple Silicon M*
$ lein mandane
Mandane => (def ζ (λ [f] ((λ [x] (x x)) (λ [x] (f (λ [& s] (apply (x x) s)))))))
...
Mandane => (defn mandane-is [c] (str "Mandane is a minimal " c " interpreter expressed entirely in " c))
Mandane => (mandane-is 'Clojure)
"Mandane is a minimal Clojure interpreter expressed entirely in Clojure"
...
Mandane => (repl)
Mandane => (let [m 'Mandane] (str m " to be expressed entirely in " m " complected from AArch64 primitives"))
"asap!"