source: to-imperative/trunk/samples/Syntax/block7.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 StdIO;
2
3$func F s = s;
4F s1 = s1;
5
6$func Main = e;
7Main =
8  { <F 1> :: s1, s1; } :: s2,
9  { <F 2> :: s1, s1; } :: s3,
10  { <F 3>; } :: s1,
11  <WriteLn s2 s3 s1>;
Note: See TracBrowser for help on using the repository browser.