Skip to content

Instantly share code, notes, and snippets.

@FreeBirdLjj

FreeBirdLjj/y-combinator.rkt

Created September 19, 2014 02:58
Show Gist options
  • Save FreeBirdLjj/b79055e1c7dc0d77cf33 to your computer and use it in GitHub Desktop.
Save FreeBirdLjj/b79055e1c7dc0d77cf33 to your computer and use it in GitHub Desktop.
Download ZIP
A racket version of y-combinator.
Raw
y-combinator.rkt
(define (y-combinator fn)
((lambda (func)
(func func))
(lambda (f)
(fn (lambda args
(apply (f f) args))))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment