rime.scm

(define-module (rime))

(eval-when (eval load compile)
  (begin
    (define %public-modules
      '((rime candidate)
        (rime check)
        (rime structs)
        (rime traits)
        (rime menu)
        (rime commit)
        (rime context)
        (rime config)
        (rime composition)
        (rime schema)
        (rime session)
        (rime status)
        (rime module)
        (rime info)
        (rime api)))

    (let* ((current-module (current-module))
           (current-module-interface (resolve-interface (module-name current-module))))
      (for-each
       (lambda (submodule)
         (let ((submodule-interface (resolve-interface submodule)))
           (module-use! current-module submodule-interface)
           (module-use! current-module-interface submodule-interface)))
       %public-modules))))