From 0096e0afff9c53c48be6686edfc83d80ecdeac1e Mon Sep 17 00:00:00 2001
From: rsiddharth <s@ricketyspace.net>
Date: Sat, 5 Jan 2019 14:03:54 -0500
Subject: net: Add (net ricketyspace sicp two twentythree).

---
 net/ricketyspace/sicp/two/twentythree.scm | 8 ++++++++
 1 file changed, 8 insertions(+)
 create mode 100644 net/ricketyspace/sicp/two/twentythree.scm

(limited to 'net/ricketyspace')

diff --git a/net/ricketyspace/sicp/two/twentythree.scm b/net/ricketyspace/sicp/two/twentythree.scm
new file mode 100644
index 0000000..230e242
--- /dev/null
+++ b/net/ricketyspace/sicp/two/twentythree.scm
@@ -0,0 +1,8 @@
+;;;; License: CC0-1.0
+
+(define-module (net ricketyspace sicp two twentythree)
+  #:export (for-each-sicp))
+
+(define (for-each-sicp f l)
+  (cond ((null? l) #t)
+        (else (begin (f (car l)) (for-each-sicp f (cdr l))))))
-- 
cgit v1.2.3