Package erjang

Examples of erjang.ETuple.arity()

187
188
189
190
191
192
193
194
195
196
197
    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);
View Full Code Here
361
362
363
364
365
366
367
368
369
370
371
    // 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()) {
View Full Code Here
439
440
441
442
443
444
445
446
447
448
449
    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) {
View Full Code Here
623
624
625
626
627
628
629
630
631
632
633
    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
645
646
647
648
649
650
651
652
653
654
655
      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
663
664
665
666
667
668
669
670
671
672
673
    ETuple t = expr.testTuple();
    if (t != null) {

      // {const, X}
      if (t.arity() == 2 && t.elm(1) == am_const) {
        return new ConstantExpr(t.elm(2));
      }

      // {{}} | {{ConditionExpression, ...}}
      ETuple inner_t;
View Full Code Here
719
720
721
722
723
724
725
726
727
728
729
    return res.toArray(new GuardCall[res.size()]);
  }

  private static GuardCall parse_MatchCondition(EObject expr, ParseContext ctx) {
    ETuple t = expr.testTuple();
    if (t == null || t.arity() < 1 || !GuardFunctions.contains(t.elm(1))) {
      throw ERT.badarg(expr);
    }

    return new GuardCall(t, ctx);
  }
View Full Code Here
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
          return ep.value;
        }
      } else if (funs[0].head instanceof EqualsPattern) {
        EqualsPattern ep = (EqualsPattern) funs[0].head;
        ETuple tup;
        if ((tup=ep.value.testTuple()) != null && tup.arity() >= keypos1) {
          return tup.elm(keypos1);
        }
      }
    }
View Full Code Here
424
425
426
427
428
429
430
431
432
433
434
          newline_any = false;

        } else if (opt == am_bsr_unicode) {
          newline_any = true;

        } else if ((tup = opt.testTuple()) != null && tup.arity() == 2
            && tup.elm(1) == am_newline) {

          newline_cr = false;
          newline_crlf = false;
          newline_lf = false;
View Full Code Here
449
450
451
452
453
454
455
456
457
458
459
            newline_any = true;
          } else {
            return false;
          }
         
        } else if (tup != null && tup.arity() == 2 && tup.elm(1) == am_capture) {
          this.capture_spec = tup.elm(2);
          this.capture_type = am_index;

        } else if (tup != null && tup.arity() == 3 && tup.elm(1) == am_capture) {
          this.capture_spec = tup.elm(2);
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.