Skip to content

Instantly share code, notes, and snippets.

@freiksenet

freiksenet/gist:057398a16478a6c8856d Secret

Created August 21, 2013 12:34
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save freiksenet/057398a16478a6c8856d to your computer and use it in GitHub Desktop.
Save freiksenet/057398a16478a6c8856d to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.clj
user=> (def f (float-array 10))
#'user/f
user=> (aset f 0 (float 1.0))
1.0
user=> (def s (doall (seq f)))
#'user/s
user=> s
(1.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0)
user=> (aset f 1 (float 2.0))
2.0
user=> s
(1.0 2.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment