// xfail-stage0
// -*- rust -*-

impure fn main() {
  let port[int] p = port();
  auto c = chan(p);
  let int y;

  spawn child(c);
  y <- p;
  log "received 1";
  log y;
  check (y == 10);

  spawn child(c);
  y <- p;
  log "received 2";
  log y;
  check (y == 10);
}

impure fn child(chan[int] c) {
  c <| 10;
}