granite-rust/src/test/run-pass/unwind-resource.rs
2011-10-20 20:34:04 -07:00

21 lines
No EOL
341 B
Rust

// xfail-win32
use std;
import std::task;
import std::comm;
resource complainer(c: comm::chan<bool>) {
comm::send(c, true);
}
fn f(c: comm::chan<bool>) {
task::unsupervise();
let c <- complainer(c);
fail;
}
fn main() {
let p = comm::port();
let c = comm::chan(p);
task::spawn(c, f);
assert comm::recv(p);
}