;; -*- scheme -*-

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

(define-syntax-rule (push! var x)
  (set! var (cons x var)))

(define (add-to-load-path* dir)
  (push! %load-path dir)
  (push! %load-compiled-path dir))