]> git.draconx.ca Git - gob-dx.git/blobdiff - src/test.gob
Release 0.90.5
[gob-dx.git] / src / test.gob
index 42adca4862b36709d5261e5202f138c7b54b1d47..f7fbf8d1f7b5b7f46c9f6e1a9d7c3b02b575c639 100644 (file)
@@ -13,12 +13,13 @@ class Gtk:Weird:Button from Gtk:Button {
        argument INT i set { self->i = ARG; } get { ARG = self->i; } ;
        private int j;
        public GtkWidget * h;
+       public char *bleh;
 
        init(object) {
                GtkWeirdButton *but = GTK_WEIRD_BUTTON(object);
                but->i=0;
        }
-       class_init(class);
+       class_init(klass);
        public GtkWidget * new(int j (check > 0)) {
                GtkWidget *ret;
                ret = GTK_WIDGET (GET_NEW);
@@ -46,8 +47,29 @@ class Gtk:Weird:Button from Gtk:Button {
        virtual int beh(self, int h (check > 0));
        override(Gtk:Container) void add(Gtk:Container * self (check null type),
                                         Gtk:Widget * wid (check null type)) {
-               if (GTK_CONTAINER_CLASS (parent_class)->add)
-                       (* GTK_CONTAINER_CLASS (parent_class)->add) (self,wid);
+               PARENT_HANDLER(self,wid);
+       }
+       public int consttest(self, const gchar *text, ...)
+       {
+               return 25;
+       }
+       signal private first NONE (NONE)
+       void googlegoogle(self)
+       {
+               puts("TEST1");
+               googlegoogle2(self);
+       }
+       signal first private NONE (NONE)
+       void googlegoogle2(self)
+       {
+               puts("TEST2");
+               testprivvirtual(self);
+       }
+       virtual private
+       void testprivvirtual(self)
+       {
+               puts("TEST3");
+               googlegoogle(self);
        }
 }