08/06/22 15:26:09
; >>783
;The Read-Eval-Print Loop
(define (driver-loop)
(begin
(let ((input (read))) ; read
(let ((output (eval input))) ; eval
(display output))) ; print
(driver-loop))) ; loop
08/06/22 15:26:09
; >>783
;The Read-Eval-Print Loop
(define (driver-loop)
(begin
(let ((input (read))) ; read
(let ((output (eval input))) ; eval
(display output))) ; print
(driver-loop))) ; loop