source: to-imperative/trunk/samples/Syntax/iter1.rf @ 1445

Last change on this file since 1445 was 1230, checked in by orlov, 17 years ago
  • Test for $iter.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 154 bytes
Line 
1$use StdIO;
2
3Main =
4  1 2 3 : e.nums,
5  e.nums $iter {
6    e.nums : s.n e.rest =
7      <PrintLN s.n>,
8      e.rest;
9  } :: e.nums,
10  e.nums : /*empty*/;
11
Note: See TracBrowser for help on using the repository browser.