   (let [type (get-in definition [:operation-type :type])]
     (log/debug "*** execute-definition: fragments: " fragments)
     (case type
-      "query" (log/spy (execute-query context schema resolver-fn definition fragments))
+      "query" (execute-query context schema resolver-fn definition fragments)
       (throw (ex-info (format "Unhandled operation root type: %s." definition) {})))))
 
 (defn execute

        resolve-fn (resolver-fn parent-type-name field-name)]
    (log/debug "resolve-field-on-object: arguments: " arguments)
    (if arguments
      (log/spy (resolve-fn context parent-object arguments))
      (log/spy (resolve-fn context parent-object)))))

(defn merge-selection-sets
  [selections]

        fragments (:fragments document)]
    (if (empty? operation-definitions)
      (throw (ex-info (format "Document is invalid (%s)." document) {}))
      {:data (into {} (map (fn [definition]
                             (execute-definition context schema resolver-fn definition fragments))
                           operation-definitions))})))

(comment
  (execute nil (parser/transform (parser/parse "query {user {id}}")) (graphql-clj.type/create-type-meta-fn graphql-clj.type/demo-schema))
