procedure M (s: ref) {
  assert s != null;
}
type ref;
const null: ref;