                                    is-fail? (fail? result)]
                                (if is-fail?
                                  (do
-                                   (log/trace (str "fail-path-between:" (fail-path-between (strip-refs (get-in bolt path))
-                                                                                           (strip-refs complement))))))
+                                   (log/debug (str "fail-path-between:" (fail-path-between (strip-refs (get-in bolt path))
+                                                                                           (strip-refs complement)))))
+                                 (log/debug (str "SUCCESS! " (wrapped-morph morph complement))))
+                                 
                                (if is-fail? :fail result)))
                      
                            ;; lazy-sequence of phrasal complements to pass one-by-one to the above (map)'s function.

           result)
         (catch Exception e
           (do
             (log/warn (str "ignoring exception: " e " and returning canonical form instead."))
             (strip-refs (get-in structure [:espanol])))))
    ;; TODO: consider throwing exception here.
    "(morph-fn is null)"))


              (log/debug (str "not trying to add phrases as child because depth is greater than maxdepth:" maxdepth)))

            debug (if (empty? phrasal-children-candidates)
                    (log/warn (str "no phrasal-children-candidates: candidates were:"
                                   (string/join ","
                                                (map #(get-in % [:rule]) candidate-parents)))))

