gistfile1.clj

    (go
      (let [chans
            (sequence 
              brushes 
                (comp
                    (map
                        (fn [[name brush]]
                            (if (:texture brush)
                                (load-texture (:texture brush)))))
                                (filter identity)))
            textures (<! (async/into [] chans))]
        {:gl gl
         :driver driver
         :programs programs
         :pers pers
         :textures textures}))