Release 1.0.2

[gob-dx.git] / src / test.gob

diff --git a/src/test.gob b/src/test.gob
index 402f69ccb839a18d959c8f2fe814875e436f0764..be3f54301d52f609eefc21b271354bcb0e841da6 100644 (file)
--- a/src/test.gob
+++ b/src/test.gob
@@ -7,6 +7,7 @@ requires 0.93.0
 
 %headertop{
 /* this should go on the very top of the header */
+
 %}
 %ht{
 /* this should go on the very top of the header as well */
@@ -37,13 +38,25 @@ static void jjjj(void);
 %}
 
 %h{
+enum _gob__enum_t {
+       BUDLIKY, BUDLIKY2
+};
+
+struct _gob__struct_t {
+       int i, x, y, z;
+};
+union _gob__union_t {
+       int i, x, y, z;
+};
 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; } ;
 
@@ -58,6 +71,9 @@ class Gtk:Weird:Button from Gtk:Button {
                destroywith gtk_object_unref;
        argument POINTER testingobj objectlink;
 
+       classwide int foo = 20;
+       argument INT foo link;
+
        public Gtk:Object * testingobj2
                destroy {
                        if(VAR)
@@ -102,7 +118,7 @@ class Gtk:Weird:Button from Gtk:Button {
 
                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);
 
@@ -124,7 +140,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:
@@ -136,7 +152,7 @@ class Gtk:Weird:Button from Gtk:Button {
         *
         * Returns: new object */
        signal last INT (POINTER, INT)
-       int bleh2(self, Gtk:Widget * wid (check null type),
+       int bleh2(self, const Gtk:Widget * wid (check null type),
                        int h (check > 0)) {
                /* testing multiple marshaller support */
                return 0;
@@ -167,7 +183,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;
        }
@@ -180,6 +196,14 @@ class Gtk:Weird:Button from Gtk:Button {
        {
                return 25;
        }
+       public int consttest2(self, gchar const *text, ...)
+       {
+               return 25;
+       }
+       public int consttest3(self, Gtk:Widget const *wid (check null type))
+       {
+               return 25;
+       }
        signal private first NONE (NONE)
        void googlegoogle(self)
        {
@@ -190,8 +214,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)
@@ -210,12 +235,12 @@ class Gtk:Weird:Button from Gtk:Button {
                googlegoogle(self);
        }
        private virtual
-       void testprivvirtual2(self, int some_array[5][8][9])
+       void testprivvirtual2(self, const int some_array[5][8][9])
        {
                /* nothing here */
        }
        public virtual
-       void testpublicvirtual(self, int some_array[5][8][9])
+       void testpublicvirtual(self, int const some_array[5][8][9])
        {
                /* nothing here */
        }
@@ -256,6 +281,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 */
@@ -273,10 +306,38 @@ class Gtk:Weird:Button from Gtk:Button {
        }
 
        public signal (NO_HOOKS) last INT (INT)
-       int testflags(self, int w (check > 0)) {
+       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 types */
+       public int t1;
+       public long int t2;
+       public int long t3;
+       public int long const t4;
+       public const int long t5;
+       public const char * const t6;
+       public char const * const t7;
+       public enum _gob__enum_t const * const t8;
+       public union _gob__union_t t9;
+       public union _gob__union_t * const * const * t10;
+       public struct _gob__struct_t * const * const * t11;
+       public const struct _gob__struct_t * const * const * t13;
+       public const enum _gob__enum_t * const * const * t14;
+       public enum _gob__enum_t t15;
+       public gchar const t16;
+       public const gchar * const t17;
+       public const gchar t18;
+
        /* testing empty statements */
        ;
        ;