10 lines
160 B
Common Lisp
10 lines
160 B
Common Lisp
|
(define repl
|
||
|
|
(lambda () (
|
||
|
|
(print "λ -> ")
|
||
|
|
(print
|
||
|
|
(eval
|
||
|
|
(read)))
|
||
|
|
(print "\n")
|
||
|
|
(repl))))
|
||
|
|
(repl)
|