Skip to content

Instantly share code, notes, and snippets.

@beomkm

beomkm/rkt.rkt

Created November 27, 2015 08:20
Show Gist options
  • Save beomkm/1bb7500fe3e964aefb6d to your computer and use it in GitHub Desktop.
Save beomkm/1bb7500fe3e964aefb6d to your computer and use it in GitHub Desktop.
Download ZIP
Raw
rkt.rkt
(define (askContinue)
(display "contunue? (Y/N)")
(define in (read))
(cond
((eq? in 'Y) #t)
((eq? in 'N) #f)
(else (askContinue))
)
)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment