                         ;; field-type (get-field-type-from-object-type parent-type field)
                         ;; resolved-object (resolve-field-on-object field-type root-value field)
                         field-entry (get-field-entry context schema resolver-fn parent-type root-value field fragments)]
-                    (log/spy field-entry)))
+                    field-entry))
                 fields)))
 
 (defn execute-query [context schema resolver-fn query fragments]

  (:require [graphql-clj.parser :as parser]
            [graphql-clj.type :as type]
            [taoensso.timbre :as log]))

;; (defn get-selection-object-name
;;   [selection]
;;   {:post [(not (nil? %))]}
;;   (log/debug "get-selection-object-name: " selection)
;;   (let [name (get-in (second selection) [:field :name])]
;;     (log/debug "get-selection-object-name: name: " name)
;;     name))

(defn get-selection-arguments
  [selection]

    (cond
      (is-scalar-field-type? field-type) result
      (is-enum-field-type? field-type) result
      (is-object-field-type? field-type) (execute-fields context schema resolver-fn field-type result sub-selection-set fragments)
      (is-list-field-type? field-type) (map #(execute-fields context schema resolver-fn (type/get-inner-type schema field-type) % sub-selection-set fragments) result)
      (is-not-null-type? field-type) (let [not-null-result (complete-value context schema resolver-fn (type/get-inner-type schema field-type) result sub-selection-set fragments)]
                                       (if not-null-result
                                         not-null-result
                                         (throw (ex-info (format "NOT_NULL type %s returns null." field-type {:field-type field-type})))))
      :else (throw (ex-info (format "Unhandled field type %s." field-type) {:field-type field-type})))))

(defn get-field-entry [context schema resolver-fn parent-type parent-object field-entry fragments]
