]> gitweb.factorcode.org Git - factor.git/commitdiff
audio.chunked-file: inline "check-chunk" so heap-size call can be folded away and...
authorJoe Groff <arcata@gmail.com>
Sun, 14 Feb 2010 21:58:24 +0000 (13:58 -0800)
committerJoe Groff <arcata@gmail.com>
Sun, 14 Feb 2010 21:58:24 +0000 (13:58 -0800)
extra/audio/chunked-file/chunked-file.factor

index a450790ec625119d90379172d9346511ef4941b3..f5844a60d0acbfcd1eedb180a2e164d4bbe067c3 100644 (file)
@@ -24,5 +24,5 @@ ERROR: invalid-audio-file ;
     } case ;
 
 : check-chunk ( chunk id class -- ? )
-    heap-size [ id= ] [ [ length ] dip >= ] bi-curry* bi and ;
+    heap-size [ id= ] [ [ length ] dip >= ] bi-curry* bi and ; inline