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

ui.images: don't need to << >>.

db4
John Benediktsson 2015-07-28 19:14:01 -07:00
parent 60d7d84b56
commit acded37575
1 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
basis/ui/images/images.factor
View File

@ -1,8 +1,8 @@
! Copyright (C) 2009 Slava Pestov. ! Copyright (C) 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs cache combinators images images.loader USING: accessors assocs cache combinators images.loader kernel
kernel memoize namespaces opengl opengl.gl opengl.textures system memoize namespaces opengl.textures system ui.gadgets.worlds
ui.gadgets.worlds vocabs.loader vocabs ; vocabs ;
IN: ui.images IN: ui.images
TUPLE: image-name path ; TUPLE: image-name path ;
@ -31,10 +31,8 @@ PRIVATE>
: image-dim ( image-name -- dim ) : image-dim ( image-name -- dim )
cached-image dim>> ; cached-image dim>> ;
<<
{ {
{ [ os macosx? ] [ "images.loader.cocoa" require ] } { [ os macosx? ] [ "images.loader.cocoa" require ] }
{ [ os windows? ] [ "images.loader.gdiplus" require ] } { [ os windows? ] [ "images.loader.gdiplus" require ] }
[ "images.loader.gtk" require ] [ "images.loader.gtk" require ]
} cond } cond
>>