Skip to content

Instantly share code, notes, and snippets.

@danking

danking/gist:1473268

Created December 13, 2011 18:38
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save danking/1473268 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save danking/1473268 to your computer and use it in GitHub Desktop.
Download ZIP
Does this exist?
Raw
gistfile1.rkt
(for/while ([var init] ...)
stop-proc
body ...)
=>
(define (loop var ...)
(if (stop-proc var ...)
(values var ...)
(let-values (((var ...) (begin body ...)))
(loop var ...))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment