Since I have made several changes to SWIG over the years to accomodate

[wxWidgets.git] / wxPython / wxSWIG / swig_lib / guile / guilemain.i

diff --git a/wxPython/wxSWIG/swig_lib/guile/guilemain.i b/wxPython/wxSWIG/swig_lib/guile/guilemain.i
new file mode 100644 (file)
index 0000000..88988e9
--- /dev/null
+++ b/wxPython/wxSWIG/swig_lib/guile/guilemain.i
@@ -0,0 +1,21 @@
+%{
+void guile_main(void *closure, int argc, char **argv) {
+    char buffer[1024];
+    void SWIG_init();
+    SWIG_init();
+    printf("starting Guile...\n");
+    printf("guile >");
+    while (fgets(buffer,1024,stdin)) {
+       gh_eval_str(buffer);
+       printf("guile >");
+    }
+}
+
+void main(int argc, char **argv) {
+    gh_enter(argc,argv, guile_main);
+}
+%}
+
+
+
+