X-Git-Url: http://git.draconx.ca/gitweb/gob-dx.git/blobdiff_plain/573256d3bc21896c54c511d5c0e6927f09b4209e..4f0369e24277442e70d0edaab02b022bc7a2b6f5:/src/test.gob

diff --git a/src/test.gob b/src/test.gob
index a885f4f..3de497c 100644
--- a/src/test.gob
+++ b/src/test.gob
@@ -92,7 +92,7 @@ enum BUBLE {
         ALT
 } Buble:Enum;
 
-class Test:Object from G:Object
+class Test:Object from /*G:Object*/ Gtk:Container
 	(interface Gtk:Tree:Model)
 	/* We can add more interfaces by adding more lines like the above */
 	/* Note that there must exist a GtkTreeModelIface structure */
@@ -124,6 +124,10 @@ class Test:Object from G:Object
 		unrefwith g_object_unref;
 	argument POINTER testingobj objectlink;
 
+	public Test:Object * testingobjllll
+		unrefwith gtk_widget_destroy;
+	argument POINTER testingobjllll objectlink;
+
 	public Test:Object * testingobjfoo
 		unref { if (VAR) g_object_unref (VAR); };
 	argument POINTER testingobjfoo objectlink;
@@ -221,6 +225,13 @@ class Test:Object from G:Object
 			       boxed_type=PACKAGE_TYPE_BOXED,
 			       link);
 
+	private char ov_prop;
+	property CHAR ov_prop
+		(export,
+		 override)
+		set { self->_priv->ov_prop = g_value_get_char (VAL); }
+		get { g_value_set_char (VAL, self->_priv->ov_prop); };
+
 
 	private int j;
 	public GObject * h;
@@ -340,10 +351,23 @@ class Test:Object from G:Object
 		return NULL;
 	}
 	virtual int beh(self, int h (check > 0));
-	/*override(G:Object) void add(Gtk:Container * self (check null type),
-				         Gtk:Widget * wid (check null type)) {
+	override(Gtk:Container)
+	void add(Gtk:Container * self (check null type),
+                 Gtk:Widget * wid (check null type)) {
 		PARENT_HANDLER(self,wid);
-	}*/
+	}
+
+	override(G:Object)
+	void dispatch_properties_changed (G:Object      *object,
+					  guint	   n_pspecs,
+					  GParamSpec  **pspecs)
+	{
+		object = NULL;
+		n_pspecs = 0;
+		pspecs = NULL;
+		/* EKI! */
+	}
+
 	public int consttest(self, const gchar *text, ...)
 	{
 		text = NULL;