diff options
| -rw-r--r-- | src/perl/common/Core.xs | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/perl/common/Core.xs b/src/perl/common/Core.xs index 6e0503d1..572fa52b 100644 --- a/src/perl/common/Core.xs +++ b/src/perl/common/Core.xs @@ -59,6 +59,16 @@ void signal_stop_by_name(signal) char *signal +char * +signal_get_emitted() +CODE: + RETVAL = (char *) signal_get_emitted(); +OUTPUT: + RETVAL + +int +signal_get_emitted_id() + int timeout_add(msecs, func, data) int msecs |