Changeset 1822


Ignore:
Timestamp:
Dec 27, 2005, 9:38:31 PM (15 years ago)
Author:
orlov
Message:
  • Fixed concatenation with empty expression.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/java/org/refal/plus/Expr.java

    r1820 r1822  
    207207        if (length != 0)
    208208        {
    209             if (e1.expr == e2.expr && e1.index + e1.length == e2.index)
     209            if (e1.length == 0)
     210            {
     211                expr = e2.expr;
     212                index = e2.index;
     213            }
     214            else if (e2.length == 0)
     215            {
     216                expr = e1.expr;
     217                index = e1.index;
     218            }
     219            else if (e1.expr == e2.expr && e1.index + e1.length == e2.index)
    210220            {
    211221                expr = e1.expr;
     
    220230            }
    221231        }
     232        else
     233            index = 0;
    222234    }
    223235
Note: See TracChangeset for help on using the changeset viewer.