Skip to content

Commit c6325b3

Browse files
committed
update y-combinator
1 parent 47f3ea1 commit c6325b3

File tree

1 file changed

+4
-1
lines changed

1 file changed

+4
-1
lines changed

src/little-schemer/y-combinator.scm

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,10 +1,13 @@
1-
; the deduction of y-combinator
1+
; why we have y-combinator
2+
3+
; ok, some helper function
24
(define (add1 x)
35
(+ x 1))
46

57
(define (eternity x)
68
(eternity x))
79

10+
; take length as example
811
; initial length definition
912
(define length
1013
(lambda (l)

0 commit comments

Comments
 (0)