Implement till 3.52

2021-01-01 08:40:12 -05:00
parent 9129b66959
commit b76c5b0c70
2 changed files with 108 additions and 1 deletions
--- a/util.scm
+++ b/util.scm
@@ -64,4 +64,8 @@
    ((eq? x (car xs)) #t)
    (else (contains x (cdr xs)))))

+(define (display-line x)
+  (display x)
+  (newline))
+
 'util-loaded