1#lang racket/base
2(when (collection-file-path "main.rkt" "xrepl"
3                            #:fail (lambda _ #f))
4  (dynamic-require 'xrepl #f)
5  (define toplevel-prefix (dynamic-require 'xrepl/xrepl 'toplevel-prefix))
6  (toplevel-prefix ""))
7
8(let ([init-file (cleanse-path (find-system-path 'init-file))])
9  (when (file-exists? init-file)
10    (load init-file)))
11