lame

git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@749 d0543943-73ff-0310-b7d9-9358b9ac24b2

diff --git a/src/mod/languages/mod_perl/switch_swig.c b/src/mod/languages/mod_perl/switch_swig.c
index f57c73a9ec8a6e520e9e6094a63f64a59670a349..4ed793639171ecc298175a8164b6b469197b04b1 100644 (file)
--- a/src/mod/languages/mod_perl/switch_swig.c
+++ b/src/mod/languages/mod_perl/switch_swig.c
@@ -1,5 +1,34 @@
 #include <switch.h>
 
+
+void fs_core_set_globals(void)
+{
+       switch_core_set_globals();
+}
+
+int fs_core_init(char *path)
+{
+       switch_status status;
+
+       if (switch_strlen_zero(path)) {
+               path = NULL;
+       }
+
+       status = switch_core_init(path);
+
+       return status == SWITCH_STATUS_SUCCESS ? 1 : 0;
+}
+
+int fs_loadable_module_init(void)
+{
+       return switch_loadable_module_init() == SWITCH_STATUS_SUCCESS ? 1 : 0;
+}
+
+void fs_console_loop(void) 
+{
+       switch_console_loop();
+}
+
 void fs_console_log(char *msg)
 {
        switch_console_printf(SWITCH_CHANNEL_CONSOLE, msg);