source: to-imperative/trunk/samples/Syntax/block_pattern1.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
File size: 134 bytes
Line 
1$use StdIO;
2
3$func F s = s;
4
5F {
6  \{ A; B; } = C;
7  s = D;
8};
9
10$func Main = e;
11Main = { A B C : e s1 e, <WriteLn <F s1>>, $fail;; };
Note: See TracBrowser for help on using the repository browser.