Changeset 3685


Ignore:
Timestamp:
Apr 11, 2008, 4:16:51 PM (13 years ago)
Author:
yura
Message:
  • org.refal.plus.Table - for Refal Tables.
  • Some enhancement for Table debugging.
Files:
1 added
4 edited

Legend:

Unmodified
Added
Removed
  • devel-tools/trunk/eclipse/org.refal.rfpdt.core/plugin.xml

    r3642 r3685  
    6060            subtypes="true"
    6161            type="org.refal.plus.Expr"
    62             value="return toArray();">
    63       </javaLogicalStructure>
     62            value="return toArray();"/>
    6463      <javaLogicalStructure
    6564            description="Array"
    6665            subtypes="true"
    6766            type="org.refal.plus.Result"
    68             value="return toArray();">
     67            value="return toArray();"/>
     68      <javaLogicalStructure
     69            description="Array"
     70            subtypes="true"
     71            type="org.refal.plus.Table"
     72            value="return toArray();"/>
     73      <javaLogicalStructure
     74            description="Object"
     75            subtypes="true"
     76            type="org.refal.plus.Reference">
     77         <variable
     78               value="return object;"
     79               name="object"/>
    6980      </javaLogicalStructure>
    7081   </extension>
  • to-imperative/trunk/java/java/org/refal/plus/Expr.java

    r3683 r3685  
    445445                ((Expr) term).toStringBuffer(strBuf);
    446446                strBuf.append(')');
    447             } else if (term instanceof Reference)
     447            } else if (term instanceof Reference && ((Reference) term).object instanceof StringBuffer)
    448448                strBuf.append(((Reference<StringBuffer>) term).object);
    449449            else
  • to-imperative/trunk/java/java/org/refal/plus/Symbol.java

    r3419 r3685  
    4444
    4545    public static Reference<Map<Expr, Expr>> newTable () {
    46         return new Reference<Map<Expr, Expr>>(new TreeMap<Expr, Expr>());
     46        return new Reference<Map<Expr, Expr>>(new Table());
    4747    }
    4848
    4949    public static Comparable<?> newTable (String name) {
    50         return new Reference.Named<Map<Expr, Expr>>(name, new TreeMap<Expr, Expr>());
     50        return new Reference.Named<Map<Expr, Expr>>(name, new Table());
    5151    }
    5252
Note: See TracChangeset for help on using the changeset viewer.