Changeset 774


Ignore:
Timestamp:
May 28, 2003, 9:19:54 AM (18 years ago)
Author:
luba
Message:
  • tests for То_m_Int function are added
Location:
to-imperative/trunk/samples/Convert
Files:
1 added
2 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/samples/Convert/Makefile

    r751 r774  
    1212  to_int \
    1313  to_int2 \
     14  to_int3 \
    1415  to_int_inval \
    1516  to_int.bug1 \
    1617  to_int.bug2 \
    17   to_int.bug3
     18  to_int.bug3 \
     19  to_int_word
    1820
    1921include $(TOPDIR)/samples/samples.mk
  • to-imperative/trunk/samples/Convert/to_int2.rf

    r757 r774  
    1818    <PrintLN 'So, spaces can go before or after all digits,\n'
    1919      'but aren\'t allowed in the middle of integer print representation.'>;
     20  },
     21  {
     22    <PrintLN <To-Int 5 '7 7'>>;
     23    <PrintLN 'So, spaces can go before or after all digits,\n'
     24      'but aren\'t allowed in the middle of integer print representation.'>;
    2025  };
    2126
Note: See TracChangeset for help on using the changeset viewer.