steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

images: don't truncate in image-dim.

db4
John Benediktsson 2012-11-01 16:48:44 -07:00
parent 422bd683d3
commit 9a9ccf971b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/images/images.factor
View File

@ -70,7 +70,7 @@ TUPLE: image
: <image> ( -- image ) image new ; inline
: image-dim ( image -- dim )
[ dim>> ] [ 2x?>> ] bi [ [ 2/ ] map ] when ;
[ dim>> ] [ 2x?>> ] bi [ [ 2.0 / ] map ] when ;
: has-alpha? ( image -- ? ) component-order>> alpha-channel? ;