   :LIST
   :NOT_NULL)
 
+(defn default-resolve-fn
+  [field-name]
+  (fn [& args]
+    (let [parent (first args)]
+      (get parent (keyword field-name)))))
+
 (def type-map
   {:GraphQLString {:name "String"
                    :kind :SCALAR}

    (log/debug "get-selection-object-name: name: " name)
    name))

(defn get-selection-name
  [selection]
  (log/debug "get-selection-name: " selection)

      (is-scalar-field-type? field-type) result
      (is-enum-field-type? field-type) result
      (is-object-field-type? field-type) (log/spy (execute-fields field-type result sub-selection-set))
      :else (throw (ex-info (format "Unhandled field type %s." field-type) {:field-type field-type})))))

(defn get-field-entry [parent-type parent-object field]
  (log/debug "*** get-field-entry: " field)
