(when (regexp-match #rx"term" (or (getenv "TERM") "")) (dynamic-require '(lib "rep.ss" "readline") #f))