   (symbolize-keys (merge (select-keys row-data (map (comp keyword name) (:keys bindings)))
                          (select-keys row-data (map name (:strs bindings))))))
 
-(defmulti templatable? class)
+(defmulti ^:private templatable?
+  "Predicate that returns true if the supplied argument should be emitted when
+  attempting to inline global vars in a graph template.
+
+  Used with bind-constants."
+
+  class)
 
 (defmethod templatable? nil [v] true)
 

                                         [b c]])
                                 (graph a [a [b c]]))))

  (preview-graph ds my-template 0)

  )

           @varr
           f)
         f)
       f)) form))

(defrecord UnreadableForm [form-string form-class])

