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