source: to-imperative/trunk/samples/Syntax/block10.rf @ 2767

Last change on this file since 2767 was 2767, checked in by orlov, 13 years ago
  • Another test for unreachable branches elimination.
  • Property svn:eol-style set to native
File size: 137 bytes
RevLine 
[2767]1$use StdIO;
2
3$func? F1 = e;
4$func F2 = e;
5
6F1, 1;
7
8F2, 2;
9
10Main =
11  {
12    <PrintLn <F1>>;
13    <PrintLn <F2>>;
14    <PrintLn 'Test'>;
15  };
Note: See TracBrowser for help on using the repository browser.