bitmap loading was broken

db4
Doug Coleman 2009-03-14 00:03:44 -05:00
parent 7131882b32
commit 4ed2d030c8
1 changed files with 1 additions and 1 deletions

View File

@ -62,7 +62,7 @@ M: R16G16B16 normalize-component-order*
drop RGB16>8 add-dummy-alpha ;
: BGR>RGB ( bitmap bytes-per-pixel -- pixels )
<groups> [ 3 cut [ reverse ] dip append ] map B{ } join ; inline
<sliced-groups> [ <reversed> ] map B{ } join ; inline
M: BGRA normalize-component-order*
drop 4 BGR>RGB ;