X-Git-Url: http://git.draconx.ca/gitweb/gob-dx.git/blobdiff_plain/308dc7bdfb924370cfd205f656eb0e83191d01a9..4f0369e24277442e70d0edaab02b022bc7a2b6f5:/src/test.gob diff --git a/src/test.gob b/src/test.gob index 75d45f0..3de497c 100644 --- a/src/test.gob +++ b/src/test.gob @@ -56,6 +56,11 @@ union _gob__union_t { int i, x, y, z; }; void bubu(void); + +/* Fake boxed */ +#define PACKAGE_TYPE_BOXED 1 +typedef void * PackageBoxed; + %} %header{ /* this should be in the header, just under bubu prototype */ @@ -79,7 +84,15 @@ error TEST_OBJECT_ERROR { BAD_THAT } Test:Object:Error; -class Test:Object from G:Object +enum BUBLE { + KEIN = 0, + STANDARD, + STANDARD_RO, + KOMPLETT, + ALT +} Buble:Enum; + +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 */ @@ -111,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; @@ -191,11 +208,31 @@ class Test:Object from G:Object link); private Some:Flags flags_property; - property ENUM flags_property (nick = "flagsprop", + property FLAGS flags_property (nick = "flagsprop", blurb = "flagsprop", flags_type = Some:Flags, link); + private PackageBoxed prop; + property BOXED prop (nick="prop", + blurb="prop", + boxed_type=Package:Boxed, + link); + /* testing old semantics */ + private PackageBoxed prop2; + property BOXED prop2 (nick="prop2", + blurb="prop2", + 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; public char *bleh; @@ -251,6 +288,9 @@ class Test:Object from G:Object char * test_handler (self, GObject *w, int h, gpointer data) { + data = w = NULL; + h = 0; + return NULL; } @@ -274,6 +314,9 @@ class Test:Object from G:Object test_object_connect_data__bleh (self, self_test_handler, NULL, NULL, 0); self_connect_data__bleh (self, self_test_handler, NULL, NULL, 0); + wid = NULL; + h = 0; + /* testing multiple marshaller support */ return 0; } @@ -308,20 +351,36 @@ 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; return 25; } public int consttest2(self, gchar const *text, ...) { + text = NULL; return 25; } public int consttest3(self, G:Object const *wid (check null type)) { + wid = NULL; return 25; } public int consttest4(const self) @@ -349,10 +408,14 @@ class Test:Object from G:Object } public int consttest9(const self, int i, double b) { + b = 0.0; + i = 0; return 25; } public int consttest10(self const, int i, double b) { + b = 0.0; + i = 0; return 25; } signal private first NONE (NONE) @@ -394,26 +457,32 @@ class Test:Object from G:Object { puts("TEST3"); self_googlegoogle(self); + if (some_array[0]) return; } private virtual void testprivvirtual2(self, const int some_array[5][8][9]) { /* nothing here */ + if (some_array[0]) return; } public virtual void testpublicvirtual(self, int const some_array[5][8][9]) { /* nothing here */ + if (some_array[0]) return; } protected virtual void testprotectedvirtual(self, int some_array[5][8][9]) { /* nothing here */ + if (some_array[0]) return; } - signal first NONE (POINTER) - void testarrsignal(self, long arr[8]) + signal first NONE (POINTER, ENUM) + void testarrsignal(self, long arr[8], Buble:Enum foo) { /* foo */ + arr[0] = 1; + foo = BUBLE_KEIN; } /* testing empty func */ @@ -463,6 +532,10 @@ class Test:Object from G:Object gulong g, gfloat h, gdouble i, gchar * j, gint k, gpointer o, GObject *p) { + h = i = k = 0; + a = b = c = d = e = f = g = 0; + o = p = (GObject *)NULL; + j = (char *)NULL; /* ugh, testing casting */ } @@ -480,6 +553,15 @@ class Test:Object from G:Object return FALSE; } + /* some more enum testing */ + public BubleEnum buble; + property ENUM buble + (nick = "Buble", + blurb = "Buble", + enum_type = Buble:Enum, + default_value = BUBLE_STANDARD, + link, export); + /* testing types */ public int t1; public long int t2;