basis: Load images.{tiff,png} by default for FreeBSD. Add platforms back.

freebsd-work
Doug Coleman 2019-02-09 18:50:15 +00:00
parent 123327115d
commit 5d78ab55be
4 changed files with 9 additions and 3 deletions

View File

@ -1,2 +1,3 @@
linux
macosx
bsd

View File

@ -515,7 +515,7 @@ M: gtk-ui-backend (with-ui)
M: gtk-ui-backend stop-event-loop
gtk_main_quit ;
os linux? [
os { linux freebsd } member? [
gtk-ui-backend ui-backend set-global
] when

View File

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

View File

@ -1 +1,2 @@
linux
bsd