with-timer ( quot -- ) - Factor Documentation

with-timer ( quot -- )

Vocabulary
ui.backend.gtk2

Inputs

quot

Outputs
None

Definition

USING: alien.c-types combinators continuations glib.ffi kernel
libc ;

IN: ui.backend.gtk2

:: with-timer ( quot -- )
<timer-funcs> &free GSource heap-size g_source_new
&g_source_unref :> source source G_PRIORITY_DEFAULT_IDLE
g_source_set_priority source f g_source_attach drop
[ quot ( -- ) call-effect ] [ source g_source_destroy ]
finally ;