Capture and signal interrupts? about future HOT 2 CLOSED

> library("future")

## Start a multicore process
> f <- multicore({ print(1); Sys.sleep(30); print(2); TRUE })
> [1] 1

## Let's find the PID (non-official; don't use in code)
> f$job$pid
[1] 47841

## Let's send an INT(errupt) signal
> system2("kill", c("-INT", f$job$pid))

## Check the value of the multicore future
> value(f)
[1] "fatal error in wrapper code"
attr(,"class")
[1] "try-error"
> traceback()
No traceback available

> library("future")
> f <- multicore({ print(1); Sys.sleep(30); print(2); TRUE })
> system2("kill", c("-INT", f$job$pid))
[1] 1
> value(f)
Error in value.MulticoreFuture(f) :
Detected an error ('fatal error in wrapper code') by the 'parallel' package while trying
to retrieve the value of a MulticoreFuture ('{; print(1); Sys.sleep(30); print(2); TRUE; }').
This could be because the forked R process that evalutes the future was terminated
before it was completed.
>