    The serialized column allows loading a desired expression as a Clojure map into the runtime system, including
    the expression' internal structure-sharing."
 
+  (log/debug (str "inserting expression: spec=" spec))
   (try
-    (exec-raw [(str "INSERT INTO " table " (surface, structure, serialized, language, model) VALUES (?,"
-                    ;; TODO: dissoc the spec per immediately below TODO
-                    "$$" (json/write-str (strip-refs expression)) "$$" ;; TODO: store the :spec in a new column 'spec' within the given table.
-                    ","
-                    "$$[" (string/join "" (serialize expression)) "]$$" ;; TODO: check for presence of "$$" within (serialize expression).
-                    ","
-                    "?,?)")
+    (exec-raw [(let [insert
+                     (str "INSERT INTO " table " (surface, structure, spec, serialized, language, model) VALUES (?,"
+                          "$$" (json/write-str (strip-refs expression)) "$$,"
+                          "$$" (json/write-str (strip-refs spec)) "$$,"
+                          "$$[" (string/join "" (serialize expression)) "]$$," ;; TODO: check for presence of "$$" within (serialize expression).
+                          "?,?)")]
+                 (log/trace (str "INSERT IS : " insert))
+                 insert)
                [surface
                 language
                 model-name]])

                                                   (let [spec (unify spec
                                                                     {:comp {:synsem {:agr {:number number}}}})]
                                                     (log/debug (str "generating from spec: " spec "; input-spec was:" input-spec))
                                                     (try
                                                       (process [{:fill-one-language
                                                                  {:count 1

                        "'"))
        (insert-expression source-sentence
                           source-sentence-surface
                           spec
                           "expression"
                           source-language
                           (:name source-language-model))))))
