1 ;-*- mode: scheme -*-

     2 

     3 ;; Readline support.

     4 (use-modules (ice-9 readline))

     5 (activate-readline)

     6 (readline-enable 'history-file)

     7 (readline-set! history-length 10000)

     8