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

$use StdIO;

Main =
  { XXX; YYY; } : ex,
  {
    ex : YYY;
    <PrintLN "Branch 1 failed.">,
      ex : XXX,
      <PrintLN Ok!>;
  };