simon/beowulf
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

Béowulf is mín nama

Browse source 
My monster, it lives!
This commit is contained in:
Simon Brooke 2019-08-17 11:14:40 +01:00
parent bf83fd3d91
commit 609e2c3a6e
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/beowulf/core.clj
View file

@ -4,13 +4,12 @@
(:gen-class)) (:gen-class))
(defn -main (defn -main
"I don't do a whole lot ... yet." "Read/eval/print loop."
[& args] [& args]
(println "Hello, World!") (println "Béowulf is mín nama")
(loop [] (loop []
(print ":: ") (print ":: ")
(flush) (flush)
(let [input (READ)] (let [input (READ)]
(println (str "\tI read: " input))
(println (str "> " (EVAL input @oblist))) (println (str "> " (EVAL input @oblist)))
(recur)))) (recur))))