Advertisement
Guest User

Untitled

a guest
Jul 1st, 2015
169
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.48 KB | None | 0 0
  1. (go
  2. (let [chans
  3. (sequence brushes (comp
  4. (map
  5. (fn [[name brush]]
  6. (if (:texture brush)
  7. (load-texture (:texture brush)))))
  8. (filter identity)))
  9. textures (<! (async/into [] chans))]
  10. {:gl gl
  11. :driver driver
  12. :programs programs
  13. :pers pers
  14. :textures textures}))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement