Skip to content

Instantly share code, notes, and snippets.

@l1x

l1x/gist:32cb6f7f7881cd797d2f

Forked from jlongster/gist:d21c7c4c077d4d64806f
Last active August 29, 2015 14:22
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save l1x/32cb6f7f7881cd797d2f to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save l1x/32cb6f7f7881cd797d2f to your computer and use it in GitHub Desktop.
Download ZIP

Revisions

  1. l1x revised this gist Jun 1, 2015. 1 changed file with 8 additions and 6 deletions.
    14 changes: 8 additions & 6 deletions gistfile1.clj
    View file
    Original file line number Diff line number Diff line change
    @@ -1,11 +1,13 @@
    (go
    (let [chans
    (sequence brushes (comp
    (map
    (fn [[name brush]]
    (if (:texture brush)
    (load-texture (:texture brush)))))
    (filter identity)))
    (sequence
    brushes
    (comp
    (map
    (fn [[name brush]]
    (if (:texture brush)
    (load-texture (:texture brush)))))
    (filter identity)))
    textures (<! (async/into [] chans))]
    {:gl gl
    :driver driver
  2. @jlongster jlongster revised this gist Jun 1, 2015. 1 changed file with 1 addition and 1 deletion.
    2 changes: 1 addition & 1 deletion gistfile1.clj
    View file
    Original file line number Diff line number Diff line change
    @@ -1,4 +1,4 @@
    (go
    (go
    (let [chans
    (sequence brushes (comp
    (map
  3. @jlongster jlongster created this gist Jun 1, 2015.
    14 changes: 14 additions & 0 deletions gistfile1.clj
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,14 @@
    (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}))