Nim/tests/rodfiles/gtkex1.nim

import
  cairo, glib2, gtk2

proc destroy(widget: PWidget, data: Pgpointer) {.cdecl.} =
  main_quit()

var
  window: PWidget
nim_init()
window = window_new(WINDOW_TOPLEVEL)
discard signal_connect(window, "destroy",
                       SIGNAL_FUNC(gtkex1.destroy), nil)
show(window)
main()