Fix textures with zero width and non-zero height (or vice versa) by not rendering them

db4
Slava Pestov 2009-02-20 23:30:41 -06:00
parent fa79803856
commit 0580b67542
1 changed files with 1 additions and 1 deletions

View File

@ -96,7 +96,7 @@ PRIVATE>
texture new swap >>loc
swap
[ dim>> >>dim ] keep
[ dim>> { 0 0 } = ] keep '[
[ dim>> product 0 = ] keep '[
_
[ dim>> texture-coords >>texture-coords ]
[ power-of-2-image make-texture >>texture ] bi