source: to-imperative/trunk/samples/Syntax/iter4.rf @ 2050

Last change on this file since 2050 was 2050, checked in by orlov, 14 years ago
  • Another test for $iter.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 148 bytes
RevLine 
[2050]1$use StdIO;
2
3Main =
4  { A; B; } : { s1 = s1; } $iter C :: s1, <PrintLN s1> =
5  /*empty*/ $iter e1 : { s = A; e = B; } :: e1, e1 : v = <PrintLN e1>;
Note: See TracBrowser for help on using the repository browser.