X-Git-Url: http://git.draconx.ca/gitweb/gob-dx.git/blobdiff_plain/daead564b9592e78d418deb56a211cd5ea399f76..6e77e91bbb048a0ee1a072715c0ce808c169ab38:/src/test.gob

diff --git a/src/test.gob b/src/test.gob
index 42adca4..1c522a6 100644
--- a/src/test.gob
+++ b/src/test.gob
@@ -49,6 +49,28 @@ class Gtk:Weird:Button from Gtk:Button {
 		if (GTK_CONTAINER_CLASS (parent_class)->add)
 			(* GTK_CONTAINER_CLASS (parent_class)->add) (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);
+	}
 }
 
 %{