boot-clj: как собрать / запустить модульный тест для класса, созданного с помощью gen-class

Question

В моем проекте clojure я построил несколько классов Java с помощью команды gen-class. Они есть [extractor.yaml YAMLExtractor YAMLExtractorFactory], Я хотел сейчас построить модульный тест для этих классов, но у меня есть ошибка: java.lang.ClassNotFoundException: extractor.yaml.YAMLExtractorкогда я запускаю тест.

Файл, который вызывает ошибку: yaml_extrator_factory.clj

(ns extractor.yaml-extractor-factory
  (:gen-class :name extractor.yaml.YAMLExtractorFactory
              :extends org.apache.any23.extractor.SimpleExtractorFactory
              :implements [org.apache.any23.extractor.ExtractorFactory]
              :init init
              :constructors {[] [String org.apache.any23.rdf.Prefixes java.util.Collection String]}
              :main false)
  (:require [extractor.yaml-extractor])
  (:import [extractor.yaml YAMLExtractor]
           [org.apache.any23.rdf Prefixes]
           [org.apache.any23.extractor SimpleExtractorFactory ExtractorFactory Extractor ExtractionContext ]))

Ошибка возникает только во время тестирования. Весь проект AOT-компилируется без ошибок, и это нормально, когда я создаю JAR-файл.

Тестsimple.clj содержит заголовок:

(ns extractor.simple
    (:use [clojure.tools.logging :as log]
          [clojure.java.io :as jio]
          [clojure.test :as test])
    (:require [extractor.yaml-extractor-factory])
    (:import [java.util Arrays]
             [extractor.yaml.YAMLExtractorFactory]))

И тест, который печатает CLASSPATH. yaml-extractor-factory не был использован. Тест запускается командой:

boot aot -a update-classpath run-test -t extractor.simple

куда добавляется задача update-classpath (get-env :directories) в classpath и run-test запускает тест. run-test отлично работает с обычным кодом clojure.

run-test - моя задача со следующим содержанием:

(deftask run-test "Run unit tests"
  [t test-name NAME str "Test to execute. Run all tests if not given."]

  (require '[extractor.simple])
  (with-pass-thru [_]
    (if (nil? test-name)
      (do
        (util/info "Run all tests")
        (test/run-all-tests))
      (do
        (util/info (format "Run test: %s" (:test-name *opts*)))
        (test/run-tests (symbol (:test-name *opts*)))
        ))))