                                                                                    (= (get-in spec [:synsem :sem :aspect])
                                                                                       :progressive))))
                                                                          (log/info (str "ignoring exception(llamarse-is-only-singular and present): " e))
+
+                                                                         ;; "llamarse": subject must be a pronoun
+                                                                         (and
+                                                                          (= (get-in spec [:root :espanol :espanol])
+                                                                             "llamarse")
+                                                                          (= (get-in spec [:comp :synsem :pronoun])
+                                                                             false))
+                                                                         (log/info (str "ignoring exception(llamarse-requires-pronoun-as-subject): " e))
 
                                                                          true
                                                                          (do

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

                                                                                         {:comp {:synsem {:agr {:number number}}}})]
                                                                   (log/debug (str "generating from spec(2): " spec))
                                                                   (try
                                                                     (if (fail? spec)
                                                                       (do
                                                                         (log/debug (str "ignoring failed spec."))
                                                                         0)
                                                                       (process [{:fill-one-language
                                                                                  {:count 1
                                                                                   :spec spec
                                                                                   :model small
                                                                                   }}]
                                                                                "es"))

                                                                     ;; TODO: move this to *before*
                                                                     ;; attempting generation that fails.
