]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/audio/vorbis/vorbis.factor
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...
[factor.git] / extra / audio / vorbis / vorbis.factor
index b8ab44773b1552cb8460d1a7cb926c767b3c2fec..1d2521c24699c72a6bffb9fbfeaad7d8af32ff3c 100644 (file)
@@ -172,8 +172,8 @@ ERROR: no-vorbis-in-ogg ;
     len max-len min :> len'
     pcm #channels void* <c-direct-array> :> channel*s
 
-    len' iota [| sample |
-        #channels iota [| channel |
+    len' <iota> [| sample |
+        #channels <iota> [| channel |
             channel channel*s nth len c:float <c-direct-array>
             sample swap nth
             float>short-sample short-buffer push