ui.images: load images.gdiplus as default image handler on windows
parent
509f100806
commit
8816b1e215
|
@ -7,14 +7,14 @@ FROM: images => ARGB ;
|
||||||
IN: images.gdiplus
|
IN: images.gdiplus
|
||||||
|
|
||||||
SINGLETON: gdi+-image
|
SINGLETON: gdi+-image
|
||||||
! "png" gdi+-image register-image-class
|
"png" gdi+-image register-image-class
|
||||||
! "tif" gdi+-image register-image-class
|
"tif" gdi+-image register-image-class
|
||||||
! "tiff" gdi+-image register-image-class
|
"tiff" gdi+-image register-image-class
|
||||||
! "gif" gdi+-image register-image-class
|
"gif" gdi+-image register-image-class
|
||||||
! "jpg" gdi+-image register-image-class
|
"jpg" gdi+-image register-image-class
|
||||||
! "jpeg" gdi+-image register-image-class
|
"jpeg" gdi+-image register-image-class
|
||||||
! "bmp" gdi+-image register-image-class
|
"bmp" gdi+-image register-image-class
|
||||||
! "ico" gdi+-image register-image-class
|
"ico" gdi+-image register-image-class
|
||||||
|
|
||||||
<PRIVATE
|
<PRIVATE
|
||||||
: <GpRect> ( x y w h -- rect )
|
: <GpRect> ( x y w h -- rect )
|
||||||
|
|
|
@ -33,9 +33,8 @@ PRIVATE>
|
||||||
|
|
||||||
<<
|
<<
|
||||||
{
|
{
|
||||||
{ [ os macosx? ] [
|
{ [ os macosx? ] [ "images.cocoa" require ] }
|
||||||
"images.cocoa" require
|
{ [ os winnt? ] [ "images.gdiplus" require ] }
|
||||||
] }
|
|
||||||
[
|
[
|
||||||
"images.png" require
|
"images.png" require
|
||||||
"images.tiff" require
|
"images.tiff" require
|
||||||
|
|
Loading…
Reference in New Issue