X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=extra%2Fbunny%2Fmodel%2Fmodel.factor;fp=extra%2Fbunny%2Fmodel%2Fmodel.factor;h=fb64d7193d2ee7b57ba1310bfd982b50acbd0e58;hp=f7724476a3c3a0cf11620b951f5861b414388eee;hb=e20bf9b97fe60ebe18b8972b2b56fe681fce64a8;hpb=db559f6f98522594be8ef9a9392fb6d95fab3abe diff --git a/extra/bunny/model/model.factor b/extra/bunny/model/model.factor index f7724476a3..fb64d7193d 100644 --- a/extra/bunny/model/model.factor +++ b/extra/bunny/model/model.factor @@ -1,5 +1,5 @@ USING: accessors alien.c-types alien.data arrays combinators -destructors http.client io io.encodings.ascii io.files +destructors http.download io io.encodings.ascii io.files io.files.temp kernel math math.parser math.vectors opengl opengl.capabilities opengl.demo-support opengl.gl sequences specialized-arrays splitting vectors ; @@ -46,7 +46,7 @@ CONSTANT: model-url "https://downloads.factorcode.org/misc/bun_zipper.ply" : download-bunny ( -- path ) - model-url model-path [ ?download-to ] keep ; + model-url model-path download-to ; :: (draw-triangle) ( ns vs triple -- ) triple [| elt |