Revision: 6146
Author: iratqq
Date: Sun Jan 24 00:41:03 2010
Log: * uim/uim-notify.c (notify_get_plugins_internal):
- Rename from notify_get_plugins().
(notify_get_plugins):
- Call gc-guarded notify_get_plugins_internal().
http://code.google.com/p/uim/source/detail?r=6146
Modified:
/trunk/uim/uim-notify.c
=======================================
--- /trunk/uim/uim-notify.c Thu Oct 8 19:50:19 2009
+++ /trunk/uim/uim-notify.c Sun Jan 24 00:41:03 2010
@@ -219,7 +219,7 @@
* Scheme interfaces
*/
static uim_lisp
-notify_get_plugins(void)
+notify_get_plugins_internal(void)
{
uim_lisp ret_;
DIR *dirp;
@@ -279,6 +279,13 @@
}
return uim_scm_callf("reverse", "o", ret_);
}
+
+static uim_lisp
+notify_get_plugins(void)
+{
+ return
(uim_lisp)uim_scm_call_with_gc_ready_stack((uim_gc_gate_func_ptr)notify_get_plugins_internal,
+ NULL);
+}
static uim_lisp
notify_load(uim_lisp name_)
