15 lines
261 B
Common Lisp
15 lines
261 B
Common Lisp
(define println
|
|
(lambda (s)
|
|
(print
|
|
(append s "\n"))))
|
|
|
|
(define repl
|
|
(lambda () (
|
|
(print "λ -> ")
|
|
(println
|
|
(append
|
|
("val -> "
|
|
(eval (read)))))
|
|
(repl))))
|
|
(repl)
|