source: to-imperative/trunk/samples/Syntax/iter5.rf @ 3968

Last change on this file since 3968 was 3968, checked in by yura, 12 years ago
  • Iter bug.
File size: 171 bytes
Line 
1$module Test;
2
3$use StdIO;
4
5$func Main = e;
6Main =
7  1 2 : e.body 2 e =
8  e.body $iter {
9    e.body : s e.body2 = e.body2;
10  } :: e.body,
11  <WriteLn e.body>,
12  e.body : ;
Note: See TracBrowser for help on using the repository browser.