Changeset 3864 for devel-tools/trunk


Ignore:
Timestamp:
Jul 23, 2008, 3:34:11 PM (12 years ago)
Author:
yura
Message:
  • (NATIVE s.linkage s.tag t.pragma (e.qname) t.in t.out e.value2) -> (s.linkage s.tag t.pragma (e.qname) t.in t.out (NATIVE e.value2))
Location:
devel-tools/trunk/eclipse
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • devel-tools/trunk/eclipse/org.refal.rfpdt.core/src/org/refal/rfpdt/compiler/RefalASGenerator.java

    r3851 r3864  
    117117    public void visit (AstFuncDecl astFuncDecl, Expr.Concatenator e) {
    118118        Expr.Concatenator items = Expr.getConcatenator();
    119         if (astFuncDecl.funcDef instanceof AstNative)
    120             items.toRight(NATIVE);
    121119        if (astFuncDecl.funcDef == null)
    122120            items.toRight(IMPORT);
     
    134132        astFuncDecl.outFormat.accept(this, outFormat);
    135133        items.toRight((Comparable<?>) outFormat.yield());
    136         if (astFuncDecl.funcDef instanceof AstNative)
    137             items.toRight(((AstNative) astFuncDecl.funcDef).right.identifier);
    138         else if (astFuncDecl.funcDef instanceof AstFuncDef) {
     134        if (astFuncDecl.funcDef instanceof AstNative) {
     135            Expr.Concatenator body = Expr.getConcatenator();
     136            body.toRight(NATIVE);
     137            body.toRight(((AstNative) astFuncDecl.funcDef).right.identifier);
     138            items.toRight((Comparable<?>) body.yield());
     139        } else if (astFuncDecl.funcDef instanceof AstFuncDef) {
    139140            Expr.Concatenator body = Expr.getConcatenator();
    140141            body.toRight(BRANCH);
Note: See TracChangeset for help on using the changeset viewer.