Fix texture resizing on S3 hardware on Windows. Reported by Kobi Lurie
parent
97b19ff025
commit
3148429e0c
|
@ -45,7 +45,7 @@ TUPLE: single-texture image dim loc texture-coords texture display-list disposed
|
||||||
|
|
||||||
: adjust-texture-dim ( dim -- dim' )
|
: adjust-texture-dim ( dim -- dim' )
|
||||||
non-power-of-2-textures? get [
|
non-power-of-2-textures? get [
|
||||||
[ next-power-of-2 ] map
|
[ dup 1 = [ next-power-of-2 ] unless ] map
|
||||||
] unless ;
|
] unless ;
|
||||||
|
|
||||||
: (tex-image) ( image bitmap -- )
|
: (tex-image) ( image bitmap -- )
|
||||||
|
|
Loading…
Reference in New Issue