sicp

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

commit 73ef53b87b5756e9fcb45f5c2851431a7c8d1422
parent 0f3b6bcb7dc4425c08e91348978b521baf401b07
Author: rsiddharth <s@ricketyspace.net>
Date:   Fri,  9 Nov 2018 20:14:55 -0500

net: Add (net ricketyspace sicp two seventeen).

Diffstat:
net/ricketyspace/sicp/two/seventeen.scm | 8++++++++
1 file changed, 8 insertions(+), 0 deletions(-)

diff --git a/net/ricketyspace/sicp/two/seventeen.scm b/net/ricketyspace/sicp/two/seventeen.scm @@ -0,0 +1,8 @@ +;;;; License: CC0-1.0 + +(define-module (net ricketyspace sicp two seventeen) + #:export (sicp-last-pair)) + +(define (sicp-last-pair items) + (cond ((= (length items) 1) items) + (else (sicp-last-pair (cdr items)))))