   (testing "Macroexpansion should be the same as equivalent
             arguments to defsession"
       (is (= (macroexpand `(defsession ~'foo
+                            'libx.impl.rules
                             'libx.macros-test
                             :fact-type-fn :a
                             :ancestors-fn (util/make-ancestors-fn)


  (testing "Allow overwrite defaults"
    (let [clara-session `(defsession ~'foo
                           'libx.macros-test
                           :fact-type-fn ~'(fn [x] (or (:a x)
                                                     (:b x)))


  (testing "Expand schema opt to ancestors fn"
    (is (= (macroexpand `(defsession ~'foo
                           'libx.impl.rules
                           'libx.macros-test
                           :fact-type-fn :a
                           :ancestors-fn (util/make-ancestors-fn (schema/schema->hierarchy
                                                                    ~libx.schema/libx-schema))
                           :activation-group-fn (util/make-activation-group-fn ~core/default-group)
                           :activation-group-sort-fn (util/make-activation-group-sort-fn
                                                       ~core/groups
