From 86a35088de4d8a6121092330dac2c2498b4eb8a8 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Sun, 5 Jan 2020 13:42:31 -0600 Subject: [PATCH] gpu.demos.bunny: use while* instead of each-morsel --- extra/gpu/demos/bunny/bunny.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/gpu/demos/bunny/bunny.factor b/extra/gpu/demos/bunny/bunny.factor index 43de6d1141..813e846e32 100644 --- 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 ) [