From 1c60be2f32f70f9181a261ae2c2b4efe353d0f85 Mon Sep 17 00:00:00 2001 From: Graydon Hoare Date: Thu, 24 Jun 2010 18:25:10 -0700 Subject: Fix bad output-slot logic in tag constructors. --- src/test/run-pass/mlist-cycle.rs | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'src/test') diff --git a/src/test/run-pass/mlist-cycle.rs b/src/test/run-pass/mlist-cycle.rs index 3875c5c2..2a371317 100644 --- a/src/test/run-pass/mlist-cycle.rs +++ b/src/test/run-pass/mlist-cycle.rs @@ -1,10 +1,10 @@ // -*- rust -*- -type pair = rec(int head, mutable @mlist tail); -type mlist = tag(cons(@pair), nil()); +type cell = tup(mutable @list); +type list = tag(link(@cell), nil()); fn main() { - let @pair p = rec(head=10, tail=mutable nil()); - let @mlist cycle = cons(p); - //p.tail = cycle; + let @cell first = tup(@nil()); + let @cell second = tup(@link(first)); + first._0 = link(second); } -- cgit v1.2.3