Fix texture resizing on S3 hardware on Windows. Reported by Kobi Lurie

db4
Slava Pestov 2009-04-19 03:06:05 -05:00
parent 97b19ff025
commit 3148429e0c
1 changed files with 1 additions and 1 deletions

View File

@ -45,7 +45,7 @@ TUPLE: single-texture image dim loc texture-coords texture display-list disposed
: adjust-texture-dim ( dim -- dim' )
non-power-of-2-textures? get [
[ next-power-of-2 ] map
[ dup 1 = [ next-power-of-2 ] unless ] map
] unless ;
: (tex-image) ( image bitmap -- )