wxPython/wxSWIG/swig_lib/guile/guilemain.i

   1 %{
   2 void guile_main(void *closure, int argc, char **argv) {
   3     char buffer[1024];
   4     void SWIG_init();
   5     SWIG_init();
   6     printf("starting Guile...\n");
   7     printf("guile >");
   8     while (fgets(buffer,1024,stdin)) {
   9         gh_eval_str(buffer);
  10         printf("guile >");
  11     }
  12 }
  13
  14 void main(int argc, char **argv) {
  15     gh_enter(argc,argv, guile_main);
  16 }
  17 %}
  18
  19
  20
  21