1 ! Copyright (C) 2006, 2009 Slava Pestov.
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: kernel namespaces opengl opengl.gl fry ;
8 HOOK: set-title ui-backend ( string world -- )
10 HOOK: (set-fullscreen) ui-backend ( world ? -- )
12 HOOK: (fullscreen?) ui-backend ( world -- ? )
14 HOOK: (open-window) ui-backend ( world -- )
16 HOOK: (close-window) ui-backend ( handle -- )
18 HOOK: (open-offscreen-buffer) ui-backend ( world -- )
20 HOOK: (close-offscreen-buffer) ui-backend ( handle -- )
22 HOOK: raise-window* ui-backend ( world -- )
24 GENERIC: select-gl-context ( handle -- )
26 GENERIC: flush-gl-context ( handle -- )
28 HOOK: offscreen-pixels ui-backend ( world -- alien w h )
30 HOOK: (with-ui) ui-backend ( quot -- )
32 HOOK: (grab-input) ui-backend ( handle -- )
34 HOOK: (ungrab-input) ui-backend ( handle -- )