                                                                          ;; The spec was :fail.
                                                                          (= spec :fail)
                                                                          (if true
-                                                                           (log/warn (str "ignoring spec: :fail : can't generate anything from that."))
+                                                                           (log/warn (str "spec is fail!"))
                                                                            (let [message "spec is fail!"]
                                                                              (log/error message)
                                                                              (throw (Exception. message))))

                                                                                   (= (get-in spec [:synsem :sem :aspect])
                                                                                      :progressive))))
                                                                         (log/info (str "ignoring exception(llamarse-is-only-singular and present): " e))

                                                                         true
                                                                         (do

                                                       (let [debug (log/debug (str "generating from spec(pre-person):" spec))
                                                             unify-with {:comp {:synsem {:agr {:person person}}}}
                                                             unified (unify/unify spec unify-with)
                                                             debug (if (fail? unified)
                                                                     (do
                                                                       (log/info (str "spec=fail:tried to generate with spec(pre-person):" spec))
                                                                       (log/info (str "spec=fail:tried to generate with unify-with      : " unify-with))))
                                                             spec
                                                             (if (fail? unified)
                                                               (let [message (str "could not unify " spec " with person specification:" unify-with ".")]
                                                                 (if true
                                                                   (do
                                                                     (log/debug message)
                                                                     (log/debug (str "Ignoring and continuing."))
                                                                     unified)
                                                                   (do
                                                                     (log/error message)
