Examples of elm()


Examples of erjang.ETuple.elm()

      else if (ea.equals(UTF16_ATOM))
        return Charset.forName("UTF-16BE");
    } else if ((et = encoding.testTuple()) != null) {
      EAtom ea2;
      if ((ea  = et.elm(1).testAtom()) != null &&
        (ea2 = et.elm(21).testAtom()) != null) {
        if (ea.equals(UTF16_ATOM)){
          if (ea2.equals(LITTLE_ATOM))
            return Charset.forName("UTF-16LE");
          if (ea2.equals(BIG_ATOM))
            return Charset.forName("UTF-16BE");
View Full Code Here

Examples of erjang.ETuple.elm()

      }

      private TypeMap setType(TypeMap current, EObject dd, Type type) {
        ETuple dst = dd.testTuple();

        EObject key = dst.elm(1);
        EObject value = dst.elm(2);
        if (key == X_ATOM) {
          current = current.setx(value.asInt(),
              type == Type.DOUBLE_TYPE ? EDOUBLE_TYPE : type,
                     FV.this);
View Full Code Here

Examples of erjang.ETuple.elm()

      private TypeMap setType(TypeMap current, EObject dd, Type type) {
        ETuple dst = dd.testTuple();

        EObject key = dst.elm(1);
        EObject value = dst.elm(2);
        if (key == X_ATOM) {
          current = current.setx(value.asInt(),
              type == Type.DOUBLE_TYPE ? EDOUBLE_TYPE : type,
                     FV.this);
        } else if (key == Y_ATOM) {
View Full Code Here

Examples of erjang.ETuple.elm()

        int length = tup.arity();
        Class<?> componentType = type.getComponentType();
        Object arr = Array.newInstance(componentType, length);

        for (int index = 0; index < length; index++) {
          Object value = JavaObject.unbox(self, componentType, tup
              .elm(index + 1));
          Array.set(arr, index, value);
        }

        return arr;
View Full Code Here

Examples of erjang.ETuple.elm()

       
        int count = 0;
        for (; !vals.isNil(); vals = vals.tail()) {
          try {
            ETuple val = (ETuple) vals.head();
            key = val.elm(keypos1);
            IPersistentCollection coll = (IPersistentCollection) map.valAt(key);

            if (coll instanceof IPersistentSet) {
              IPersistentSet set = (IPersistentSet) coll;
              set = set.disjoin(val);
View Full Code Here

Examples of erjang.ETuple.elm()

  }

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

  private void visit_compile(ModuleVisitor v) {
    for (ESeq exp = (ESeq) compilation_info; exp != ERT.NIL; exp = exp.tail()) {
View Full Code Here

Examples of erjang.ETuple.elm()

  }

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

  private void visit_compile(ModuleVisitor v) {
    for (ESeq exp = (ESeq) compilation_info; exp != ERT.NIL; exp = exp.tail()) {
View Full Code Here

Examples of erjang.ETuple.elm()

  }

  private void visit_compile(ModuleVisitor v) {
    for (ESeq exp = (ESeq) compilation_info; exp != ERT.NIL; exp = exp.tail()) {
      ETuple attr = (ETuple) exp.head();
      v.visitCompile((EAtom) attr.elm(1), attr.elm(2));
    }
  }

  private void visit_exports(ModuleVisitor v) {
    for (FunctionInfo exp : exports) {
View Full Code Here

Examples of erjang.ETuple.elm()

  }

  private void visit_compile(ModuleVisitor v) {
    for (ESeq exp = (ESeq) compilation_info; exp != ERT.NIL; exp = exp.tail()) {
      ETuple attr = (ETuple) exp.head();
      v.visitCompile((EAtom) attr.elm(1), attr.elm(2));
    }
  }

  private void visit_exports(ModuleVisitor v) {
    for (FunctionInfo exp : exports) {
View Full Code Here

Examples of erjang.ETuple.elm()

    ETuple t = type_arg.testTuple();
    if (t.arity() != 4) {
      throw ERT.badarg(node_arg, cid_arg, type_arg);
    }
   
    ESmall flags = t.elm(1).testSmall();
    ESmall version = t.elm(2).testSmall();
    if (flags == null || version == null) {
      throw ERT.badarg(node_arg, cid_arg, type_arg);
    }
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.