path: root/tests/programs/discard_m.zc

namespace;
include rt;

// m* on an unnamed u result lets the value be discarded; the plain call is an error
.u mk(int v) { let p = rt.new(1); p[0] = v; return u*p; }
fn main() { m*mk(7); m*mk(8); rt.put_n(7); rt.put_c(10); return 0; }