lib/signals: intro Process::kill and Process::signal (fix #180)

Signed-off-by: Alexis Laferrière <alexis.laf@xymus.net>

diff --git a/lib/signals.nit b/lib/signals.nit
index 35131d3..7d67bc0 100644 (file)
--- a/lib/signals.nit
+++ b/lib/signals.nit
@@ -144,6 +144,17 @@ redef interface Object
        protected fun set_alarm(sec: Int) `{ alarm(sec); `}
 end
 
+redef class Process
+       # Send a signal to the process
+       fun signal(signal: Int) do native_kill(id, signal)
+
+       # Send the kill signal to the process
+       fun kill do signal(sigkill)
+       
+       # Native implementation of `signal`
+       private fun native_kill(pid, signal: Int) `{ kill(pid, signal); `}
+end
+
 # Hang up detected on controlling terminal or death of controlling process
 protected fun sighup: Int do return 1