Skip to content

Instantly share code, notes, and snippets.

@winny-

winny-/readline-example.rkt

Created September 21, 2022 07:08
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save winny-/85ef59bf1933681d59aa7d08494856e5 to your computer and use it in GitHub Desktop.
Save winny-/85ef59bf1933681d59aa7d08494856e5 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
readline-example.rkt
#lang racket
(require readline)
(require readline/pread)
(let loop ()
(parameterize ([readline-prompt (string->bytes/utf-8 "👀? ")])
(match (read-line)
[(? eof-object?)
(newline)
(displayln "Bye!")]
[s
(printf "I see: `~a`\n" s)
(loop)])))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment