Changeset 689


Ignore:
Timestamp:
Apr 29, 2003, 4:03:35 AM (18 years ago)
Author:
orlov
Message:
  • All Words are changed to Chars sequences, so tests work with the current runtime version.
Location:
to-imperative/trunk/samples/Access
Files:
6 edited

Legend:

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

    r685 r689  
    1414  r_inval1 \
    1515  left \
     16  left_inval \
    1617  right \
     18  right_inval \
    1719  middle \
     20  middle_inval \
    1821  length
    1922
  • to-imperative/trunk/samples/Access/l1.rf

    r569 r689  
    44  {
    55    <PrintLN <L 0 'ab'>>, <PrintLN <L 1 'ab'>>, <PrintLN <L 2 'ab'>>;
    6     <PrintLN "Branch 1 failed.">, <PrintLN <L 1 ''>>;
    7     <PrintLN "Branch 2 failed.">, <PrintLN <L 0>>;
    8     <PrintLN "Branch 3 failed.">;
     6    <PrintLN 'Branch 1 failed.'>, <PrintLN <L 1 ''>>;
     7    <PrintLN 'Branch 2 failed.'>, <PrintLN <L 0>>;
     8    <PrintLN 'Branch 3 failed.'>;
    99  };
    1010
  • to-imperative/trunk/samples/Access/left.rf

    r587 r689  
    33Main =
    44  {
    5     <PrintLN <Left 0 0 'abc'>>, <PrintLN <Left 2 3 'abcdef'>>, <PrintLN <Left 2 3 ''>>;
    6     <PrintLN "Branch 1 failed">;
     5    <PrintLN <Left 0 0 'abc'>>,
     6      <PrintLN <Left 2 3 'abcdef'>>,
     7      <PrintLN <Left 2 3 ''>>;
     8    <PrintLN 'Branch 1 failed'>;
    79  };
    810
  • to-imperative/trunk/samples/Access/middle.rf

    r587 r689  
    33Main =
    44  {
    5     <PrintLN <Middle 0 0 'abc'>>, <PrintLN <Middle 2 3 'abcdef'>>, <PrintLN <Middle 2 3 'abcd'>>;
    6     <PrintLN "Branch 1 failed">;
     5    <PrintLN <Middle 0 0 'abc'>>,
     6      <PrintLN <Middle 2 3 'abcdef'>>,
     7      <PrintLN <Middle 2 3 'abcd'>>;
     8    <PrintLN 'Branch 1 failed'>;
    79  };
    810
  • to-imperative/trunk/samples/Access/r1.rf

    r574 r689  
    44  {
    55    <PrintLN <R 0 'ab'>>, <PrintLN <R 1 'ab'>>, <PrintLN <R 2 'ab'>>;
    6     <PrintLN "Branch 1 failed.">, <PrintLN <R 1 ''>>;
    7     <PrintLN "Branch 2 failed.">, <PrintLN <R 0>>;
    8     <PrintLN "Branch 3 failed.">;
     6    <PrintLN 'Branch 1 failed.'>, <PrintLN <R 1 ''>>;
     7    <PrintLN 'Branch 2 failed.'>, <PrintLN <R 0>>;
     8    <PrintLN 'Branch 3 failed.'>;
    99  };
    1010
  • to-imperative/trunk/samples/Access/right.rf

    r587 r689  
    33Main =
    44  {
    5     <PrintLN <Right 0 0 'abc'>>, <PrintLN <Right 2 3 'abcdef'>>, <PrintLN <Right 2 3 'abcd'>>;
    6     <PrintLN "Branch 1 failed">;
     5    <PrintLN <Right 0 0 'abc'>>,
     6      <PrintLN <Right 2 3 'abcdef'>>,
     7      <PrintLN <Right 2 3 'abcd'>>;
     8    <PrintLN 'Branch 1 failed'>;
    79  };
    810
Note: See TracChangeset for help on using the changeset viewer.