From b0436b07fa1efbbbc89769fed15039c97b368ea7 Mon Sep 17 00:00:00 2001 From: Mike Vink Date: Fri, 23 Jun 2023 17:40:04 +0200 Subject: section 3.3 done --- coding-exercises/2/66.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'coding-exercises/2') diff --git a/coding-exercises/2/66.rkt b/coding-exercises/2/66.rkt index 7cfedb8..892daee 100644 --- a/coding-exercises/2/66.rkt +++ b/coding-exercises/2/66.rkt @@ -14,7 +14,7 @@ (else (list-lookup given-key (cdr set-of-records))))) (define (lookup given-key set-of-records) - (if (null? set-of-records) + (if (null? set-of-records) false (let ((v (key (car set-of-records)))) (cond ((= given-key v) v) -- cgit v1.2.3