X-Git-Url: https://git.draconx.ca/gitweb/gob-dx.git/blobdiff_plain/1656cfade4879af0cb003e3847e58264caa5781f..refs/tags/v1.0.0:/src/test.gob

diff --git a/src/test.gob b/src/test.gob
index a8a05b2..e31319b 100644
--- a/src/test.gob
+++ b/src/test.gob
@@ -3,7 +3,7 @@
    look in here to see a whole array of different syntax options, but
    don't expect this to be an easy to read file */
 
-requires 0.92.1
+requires 0.93.0
 
 %headertop{
 /* this should go on the very top of the header */
@@ -41,11 +41,35 @@ void bubu(void);
 %}
 %header{
 /* this should be in the header, just under bubu prototype */
+#define TEST_ARRAY 5
 %}
 
 class Gtk:Weird:Button from Gtk:Button {
+	public int test_array[TEST_ARRAY];
 	public int i;
 	argument INT i set { self->i = ARG; } get { ARG = self->i; } ;
+
+	public int testing = 1;
+	argument INT testing link;
+
+	public char * testingstring = {g_strdup("test")}
+		destroywith g_free;
+	argument POINTER testingstring stringlink;
+
+	public Gtk:Weird:Button * testingobj
+		destroywith gtk_object_unref;
+	argument POINTER testingobj objectlink;
+
+	classwide int foo = 20;
+	argument INT foo link;
+
+	public Gtk:Object * testingobj2
+		destroy {
+			if(VAR)
+				gtk_object_unref(GTK_OBJECT(VAR));
+		};
+	argument POINTER (type Gtk:Object *) testingobj2 objectlink;
+	
 	argument POINTER (type GtkObject *) some_object
 		set { /* set some_object */ }
 		get { /* get some_object */
@@ -79,11 +103,11 @@ class Gtk:Weird:Button from Gtk:Button {
 		GtkWidget *ret;
 		ret = GTK_WIDGET (GET_NEW);
 
-		GTK_WEIRD_BUTTON(ret)->_priv->j = j;
+		SELF(ret)->_priv->j = j;
 
 		return ret;
 	}
-	private int blah(self, Gtk:Widget * wid (check null type),
+	private int _blah(self, Gtk:Widget * wid (check null type),
 			 int h (check > 0)) onerror -1 {
 		gtk_container_add(GTK_CONTAINER(self),wid);
 
@@ -105,7 +129,7 @@ class Gtk:Weird:Button from Gtk:Button {
 	signal last INT (POINTER, INT)
 	int bleh(self, Gtk:Widget * wid (check null type),
 		        int h (check > 0)) {
-		return blah(self,wid,h);
+		return _blah(self,wid,h);
 	}
 	/**
 	 * gtk_weird_button_bleh2:
@@ -148,7 +172,7 @@ class Gtk:Weird:Button from Gtk:Button {
 	 *zblunk*******//**//**/
 	signal first NONE (NONE)
 	void bloh(self);
-	virtual void * bah(self, int h (check > 0)) onerror NULL {
+	virtual void * bah(self, int h (check > 0)) onerror NULL defreturn 0 {
 		beh(self,h);
 		return NULL;
 	}
@@ -171,8 +195,9 @@ class Gtk:Weird:Button from Gtk:Button {
 	void googlegoogle2(self)
 	{
 		int array[5][8][9]={{{0}}};
+		Self *foo = self;
 		puts("TEST2");
-		testprivvirtual(self,array);
+		testprivvirtual(foo, array);
 	}
 	private signal first NONE (NONE)
 	void googlegoogle3(self)
@@ -237,6 +262,14 @@ class Gtk:Weird:Button from Gtk:Button {
 	remove(Gtk:Container * self (check null type),
 	       Gtk:Widget * wid (check null type));
 
+	override(Gtk:Object)
+	void
+	destroy(Gtk:Object * self (check null type))
+	{
+		/* foo bar */
+		PARENT_HANDLER(self);
+	}
+
 	protected
 	int foobar(self) {
 		/* just an empty function */
@@ -252,6 +285,24 @@ class Gtk:Weird:Button from Gtk:Button {
 	{
 		/* ugh, testing casting */
 	}
+
+	public signal (NO_HOOKS) last INT (INT)
+	int testflags(self, int w (check > 0)) defreturn -99 {
+		/*foo*/
+		return w;
+	}
+
+	/* testing NONE */
+	signal BOOL (NONE)
+	gboolean
+	test_none_thing (self)
+	{
+		return FALSE;
+	}
+	/* testing empty statements */
+	;
+	;
+	;
 }
 
 %{