Examples of ETuple


Examples of erjang.ETuple

    visit_attributes(v);

    try {
      for (ESeq exp = (ESeq) code; exp != ERT.NIL; exp = exp.tail()) {
        ETuple fun = (ETuple) exp.head();

        visit_function(v, fun);
      }
    } finally {
      v.visitEnd();
View Full Code Here

Examples of erjang.ETuple

    */
  }

  private void visit_attributes(ModuleVisitor v) {
    for (ESeq exp = (ESeq) attributes; exp != ERT.NIL; exp = exp.tail()) {
      ETuple one = (ETuple) exp.head();
      v.visitAttribute((EAtom) one.elm(1), one.elm(2));
    }
  }
View Full Code Here

Examples of erjang.ETuple

    }
  }

  private void visit_exports(ModuleVisitor v) {
    for (ESeq exp = (ESeq) exports; exp != ERT.NIL; exp = exp.tail()) {
      ETuple one = (ETuple) exp.head();
      v.visitExport((EAtom) one.elm(1), one.elm(2).asInt(), one.elm(3)
          .asInt());
    }
  }
View Full Code Here

Examples of erjang.ETuple

    conn.send(server, new OtpErlangTuple(gen));
  }

  protected ETuple check(ETuple dis1, File file) throws IOException {
    if (!TRY_NATIVE_LOADER) return dis1;
    ETuple dis2 = erjang.beam.loader.BeamLoader.read(file.getAbsolutePath()).toSymbolic();
    return check(dis1, dis2);
  }
View Full Code Here

Examples of erjang.ETuple

    ETuple dis2 = erjang.beam.loader.BeamLoader.read(file.getAbsolutePath()).toSymbolic();
    return check(dis1, dis2);
  }
  protected ETuple check(ETuple dis1, byte[] data) throws IOException {
    if (!TRY_NATIVE_LOADER) return dis1;
    ETuple dis2 = erjang.beam.loader.BeamLoader.parse(data).toSymbolic();
    return check(dis1, dis2);
  }
View Full Code Here

Examples of erjang.ETuple

    return p2.self_handle();
  }

  @BIF
  public static EObject spawn_opt(EProc self, EObject tup) throws Pausable {
    ETuple t;
    EAtom m;
    EAtom f;
    ESeq a;
    ESeq o;
    if ((t=tup.testTuple()) == null
        || t.arity() != 4
        || (m=t.elm(1).testAtom()) == null
        || (f=t.elm(2).testAtom()) == null
        || (a=t.elm(3).testSeq()) == null
        || (o=t.elm(4).testSeq()) == null
        ) throw ERT.badarg(tup);
   
    boolean link = false;
    boolean monitor = false;
    EAtom priority = null;
View Full Code Here

Examples of erjang.ETuple

      return ref;
    }

    // case 3: object is {name, node}
    ETuple tup;
    EAtom node;
    if ((tup=object.testTuple()) != null
      && tup.arity()==2
      && (name=tup.elm(1).testAtom()) != null
      && (node=tup.elm(2).testAtom()) != null)
    {
      if (node == ErlDist.node()) {

        ERef ref = ERT.getLocalNode().createRef();
        boolean success = false;
View Full Code Here

Examples of erjang.ETuple

    if (found == null) {
      return ERT.FALSE;
    }
   
    EHandle h;
    ETuple tup;
    EAtom name;
    EAtom node;
    if ((h=found.testHandle()) != null) {
      h.remove_monitor(self.self_handle(), r, flush);
    } else if ((tup=found.testTuple()) != null
          && tup.arity()==2
          && (name=tup.elm(1).testAtom()) != null
          && (node=tup.elm(2).testAtom()) != null) {
     
      EAbstractNode n = EAbstractNode.get_or_connect(self, node);
      if (n != null) {
        n.dsig_demonitor(self.self_handle(), r, name);
      }
View Full Code Here

Examples of erjang.ETuple

    return terms.toArray(new Expr[terms.size()]);
  }

  private static Expr parse_ActionTerm(EObject action, ParseContext ctx) {
    ETuple t = action.testTuple();
    if (t != null && t.arity() >= 1 && ActionFunctions.contains(t.elm(1))) {
      return new ActionCall(t, ctx);
    } else {
      return parse_ConditionExpression(action, ctx);
    }
View Full Code Here

Examples of erjang.ETuple

    if (am != null && is_expr_match_var(am)) {
      return parse_ExprMatchVariable(am, ctx);

    }

    ETuple t = expr.testTuple();
    if (t != null && t.arity() >= 1 && GuardFunctions.contains(t.elm(1))) {
      return parse_MatchCondition(t, ctx);
    }

    return parse_TermConstruct(expr, ctx);
  }
View Full Code Here
TOP
Copyright © 2018 www.massapi.com. All rights reserved.
All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.