sicp

sicp sandbox.
git clone git://git.ricketyspace.net/sicp.git
Log | Files | Refs

commit 4cb8f74731ee1277404085746d8e1da7cd549476
parent c1b0a4d02e8a0a0d0efcc8d26311414c28890b58
Author: rsiddharth <s@ricketyspace.net>
Date:   Sat, 24 Sep 2016 02:19:09 +0000

one/twelve.scm: update printing function.

Diffstat:
one/twelve.scm | 3+--
1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/one/twelve.scm b/one/twelve.scm @@ -54,6 +54,5 @@ (define (print-line l level) (let* ((l (map number->string l)) - (spaces (string-join (make-list level " ") "")) - (line (string-append spaces (string-join l)))) + (line (string-join l))) (format #t "~a\n" line)))