source: to-imperative/trunk/samples/Syntax/block2.rf @ 1233

Last change on this file since 1233 was 1096, checked in by orlov, 17 years ago
  • Test for after-block clashes.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 137 bytes
Line 
1$use StdIO;
2
3Main =
4  { XXX; YYY; } : ex,
5  {
6    ex : YYY;
7    <PrintLN "Branch 1 failed.">,
8      ex : XXX,
9      <PrintLN Ok!>;
10  };
11
Note: See TracBrowser for help on using the repository browser.