Skip to content

Instantly share code, notes, and snippets.

@JacksonGariety

JacksonGariety/gist:29f0a0ebe24a0f26c3758dc6c6c67cf2

Created April 21, 2016 19:06
Show Gist options
  • Save JacksonGariety/29f0a0ebe24a0f26c3758dc6c6c67cf2 to your computer and use it in GitHub Desktop.
Save JacksonGariety/29f0a0ebe24a0f26c3758dc6c6c67cf2 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
(define (stuff-peak a ls)
(let loop ((pair ls))
(display pair)
(newline)
(cond ((lat? pair) (begin (set! pair a)
ls))
(else (loop (car pair))))))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment