#lang racket/base
(require racket/runtime-path)
(define-runtime-path here ".")
(define-runtime-path modules "modules")

(define (add-library-path path)
  (current-library-collection-paths
    (cons path (current-library-collection-paths))))

(define vendor (getenv "VENDOR"))
(when vendor (add-library-path (string->path vendor)))

(add-library-path here)

(define (require-path p)
  (dynamic-require `(file ,(path->string p)) #f))

(for ([f (directory-list modules #:build? #t)])
  (if (file-exists? f)
    (require-path f)
    (require-path (build-path f "default.rkt"))))