#include "global.h"
#include "svalue.h"
#include "interpret.h"
#include "stralloc.h"
#include "array.h"
#include 
#include 

/* All your includes here */
#include "constants.h"
#include "gtk2.h"

/* This must be included last! */
#include "module.h"


/* Global variables
 */
//static int count = 0;

static int initialized = 0;


void pgtk2_call_signal(GtkWidget* w, struct pgtk2_signal_data* sigdata)
{
  if (sigdata->argc>0)
  {
    push_svalue(&sigdata->args);
    apply_svalue(&sigdata->cb,1);
  }
  else
  {
    apply_svalue(&sigdata->cb,0);
  }
  return;
}

// FIXME: check the need for this
void pgtk2_destroy_signal(struct pgtk2_signal_data* sigdata)
{
  g_free(sigdata);
}

/*! @module GUI
 *!
 *! All Graphical User Interfaces available for Pike are in this module
 */

/*! @module GTK2
 *!
 *! A GTK+-2.x module for Pike
 *!
 *! This is basically a wrapper around gtk functions. Only very@
 *! little code (like the module handling) is done apart from gtk code.
 */

//PIKEVAR constant __version="0.0.1";
//PIKEVAR constant __author="Sebastian Kaminski ";

/*! @decl void init(array argv)
 *!   Initializes everything needed to operate GTK
 *! @param argv
 *!   Command line arguments that might affect GTK
 *! @note
 *!   In contrary to the C gtk_init() function this one@
 *!   doesn't adjust argv to exclude GTK arguments
 */
PIKEFUN void init(array|void arg)
{
  int i,s;
  char** arr;
  struct svalue* items;

  if (args==1)
  {
    s=arg->size;
    arr=g_malloc(sizeof(char*) * s);

    for (i=0;istr );
      pop_stack();
    }

    gtk_init(&s,&arr);

    for (i=0;iu.efun->function))(0);
  apply_svalue(funct,0);  struct svalue cb;
  struct svalue args;
  pop_n_elems(args);
}*/


void pike_init_gtk2_main()
{
  INIT
}

void pike_exit_gtk2_main()
{
  EXIT
}

/*! @endmodule */
/*! @endmodule */