source: to-imperative/trunk/samples/Convert/to_int2.rf @ 757

$use Convert StdIO;

Main =
  {
    <PrintLN <To-Int " 5">>;
    <PrintLN 'Spaces aren\'t allowed in the begining of a word!'>;
  },
  {
    <PrintLN <To-Int "5 7">>;
    <PrintLN 'Spaces aren\'t allowed in the middle of a word!'>;
  },
  {
    <PrintLN <To-Int "7 ">>;
    <PrintLN 'Spaces aren\'t allowed in the end of a word!'>;
  },
  {
    <PrintLN <To-Int 5 ' 7'>>;
    <PrintLN 'So, spaces can go before or after all digits,\n'
      'but aren\'t allowed in the middle of integer print representation.'>;
  };