gpu.demos.bunny: use while* instead of each-morsel

diff --git a/extra/gpu/demos/bunny/bunny.factor b/extra/gpu/demos/bunny/bunny.factor
index 43de6d1141cb06e406b0b687e5961bc159decc51..813e846e321348946f3ae2781016dc8fe2889922 100644 (file)
--- a/extra/gpu/demos/bunny/bunny.factor
+++ b/extra/gpu/demos/bunny/bunny.factor
@@ -104,7 +104,7 @@ UNIFORM-TUPLE: loading-uniforms
     V{ } clone swap (read-line-tokens) ;
 
 : each-line-tokens ( quot -- )
-    input-stream get [ stream-read-line-tokens ] curry each-morsel ; inline
+    [ input-stream get [ stream-read-line-tokens ] curry ] dip while* ; inline
 
 : (parse-bunny-model) ( vs is -- vs is )
     [