source: to-imperative/trunk/samples/Syntax/iter3.rf

Last change on this file was 4085, checked in by yura, 11 years ago
  • To new syntax. Three files are have errors still.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 165 bytes
Line 
1$use Box StdIO;
2
3$func Main = e;
4Main =
5  <Box A B C> :: s.box,
6  $iter
7    # \{
8      <Get s.box> : s1 e2 =
9        <PrintLn s1>,
10        <Store s.box e2>;
11    };
12
Note: See TracBrowser for help on using the repository browser.