test38   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/examples/core/extempore_lang.xtm

Implementation

(bind-func test38
  (lambda ()
    (memzone 1024 (* 44100 10)
             (let ((a:|5,double|* (alloc)))
               (aset! a 0 5.5)
               (aref a 0)))))


Back to Index