full destructor support for ARC

examples/gtk3/subclassArcDestructorTest.nim

@@ -0,0 +1,37 @@
+# nim c --gc:arc count_button.nim
+import gintro/[gtk, glib, gobject, gio]
+
+type
+  CountButton = ref object of Button
+    counter: int
+
+when compileOption("gc", "arc"):
+  proc `=destroy`(x: var typeof(CountButton()[])) =
+    echo "CountButtonDestroy"
+    echo cast[CountButton](addr(x)).label # really ugly, only for test
+    gtk.`=destroy`(typeof(Button()[])(x))
+
+proc buttonClicked (button: CountButton; decrement: int) =
+  dec(button.counter, decrement)
+  button.label = "Counter: " & $button.counter 
+  echo "Counter is now: ", button.counter
+
+proc appActivate (app: Application) =
+  var button, d: CountButton
+  let window = newApplicationWindow(app)
+  window.title = "Count Button"
+  initButton(button, "Counting down from 100 by 5")
+  initButton(d, "Dummy Button") # to test call of destroy
+  echo d.getLabel
+  button.counter = 100
+  window.add(button)
+  button.connect("clicked",  buttonClicked, 5)
+  window.showAll
+
+proc main =
+  let app = newApplication("org.gtk.example")
+  connect(app, "activate", appActivate)
+  discard app.run
+
+main()
+