ass="mdzsyn-symbol">cb</span> (<span class="mdzsyn-coresym">delay</span> (<span class="mdzsyn-coresym">ffi/trampoline</span> <span class="mdzsyn-keyword">:default</span>)))

(<span class="mdzsyn-coresym">defn</span> <span class="mdzsyn-symbol">on-active</span>
  [<span class="mdzsyn-symbol">app</span>]
  (<span class="mdzsyn-coresym">def</span> <span class="mdzsyn-symbol">window</span> (<span class="mdzsyn-symbol">gtk-application-window-new</span> <span class="mdzsyn-symbol">app</span>))
  (<span class="mdz