Package clojure.lang

Examples of clojure.lang.IPersistentMap

628
629
630
631
632
633
634
635
636
637
638
639
640
        Object map_field_by = def.mapFieldBy(field);
        if (map_field_by != null) {
          String field_name = def.namingStrategy.protoName(map_field_by);
          for (ISeq s = RT.seq(value); s != null; s = s.next()) {
            Map.Entry<?, ?> e = (Map.Entry<?, ?>)s.first();
            IPersistentMap map = (IPersistentMap)e.getValue();
            Object k = e.getKey();
            Object v = toProtoValue(field, map.assoc(map_field_by, k).assoc(field_name, k));
            addRepeatedField(builder, field, v);
          }
        } else if (field.getOptions().getExtension(Extensions.map)) {
          for (ISeq s = RT.seq(value); s != null; s = s.next()) {
            Map.Entry<?, ?> e = (Map.Entry<?, ?>)s.first();
View Full Code Here
762
763
764
765
766
767
768
769
770
771
772
        throw new IllegalArgumentException("Vector arg to map conj must be a pair");
      }
      return assoc(v.nth(0), v.nth(1));
    } else {
      DynamicMessage.Builder builder = builder();
      IPersistentMap ext = this.ext;
      for (ISeq s = RT.seq(o); s != null; s = s.next()) {
        Map.Entry<?, ?> e = (Map.Entry<?, ?>)s.first();

        Object k = e.getKey(), v = e.getValue();
        if (!addField(builder, k, v)) {
View Full Code Here
789
790
791
792
793
794
795
796
797
798
799
  @Override
  public IPersistentMap without(Object key) {
    Descriptors.FieldDescriptor field = def.fieldDescriptor(key);
    if (field == null) {
      IPersistentMap newExt = (IPersistentMap)RT.dissoc(ext, key);
      if (newExt == ext) {
        return this;
      }
      return new PersistentProtocolBufferMap(meta(), newExt, def, builder());
    }
View Full Code Here
73
74
75
76
77
78
79
80
81
82
83
84
      if (newBody!=body) newBody=newBody.optimise(); // re-optimise if needed
      body=newBody;
    }
   
    // manage dependency updates
    IPersistentMap tempDependencies=this.dependencies;
    IPersistentMap tempDependents=this.dependents;
   
    IPersistentSet free=body.accumulateFreeSymbols(PersistentHashSet.EMPTY);
   
    IPersistentSet oldDeps=(IPersistentSet) tempDependencies.valAt(key);
    if ((oldDeps==null)) oldDeps=PersistentHashSet.EMPTY;
View Full Code Here
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
    return new LambdaFn(env, body, params);
  }
 
  public Object invokeArray(Object... args) {
    if (args.length!=arity) throwArity(args.length);
    IPersistentMap bindings=PersistentHashMap.EMPTY;
    for (int i=0; i<arity; i++) {
      bindings=bindings.assoc(params[i], args[i]);
    }
    Environment e=body.compute(env, bindings);
    while (true) {
      Object ro=e.getResult();
      if (ro instanceof ReturnResult) return ((ReturnResult) ro).value;
      if (!(ro instanceof RecurResult)) break;
      RecurResult re=(RecurResult) ro;
      for (int i=0; i<arity; i++) {
        bindings=bindings.assoc(params[i], re.values[i]);
      }
      e=body.compute(e,bindings);
    }
    return e.getResult();
  }
View Full Code Here
50
51
52
53
54
55
56
57
58
59
60
    initialize();
   
    ClassLoader bundleLoader = new BundleClassLoader(aBundle);
    final URL[] urls = (additionalURLs == null) ? new URL[] {} : additionalURLs.toArray(new URL[additionalURLs.size()]);
    URLClassLoader loader = new URLClassLoader(urls, bundleLoader);
    IPersistentMap bindings = RT.map(Compiler.LOADER, loader);

    boolean pushed = true;

    ClassLoader saved = Thread.currentThread().getContextClassLoader();
View Full Code Here
169
170
171
172
173
174
175
176
177
178
179
180
        throw new IllegalArgumentException(
            "Vector arg to map conj must be a pair");
      return assoc(v.nth(0), v.nth(1));
    }

    IPersistentMap ret = this;
    for (ISeq es = RT.seq(o); es != null; es = es.next()) {
      Map.Entry e = (Map.Entry) es.first();
      ret = ret.assoc(e.getKey(), e.getValue());
    }
    return ret;
  }
View Full Code Here
TOP

Related Classes of clojure.lang.IPersistentMap

  • ccw.util.osgi.ClojureOSGi
  • flatland.protobuf.PersistentProtocolBufferMap
  • kiss.lang.Environment
  • kiss.lang.impl.LambdaFn
  • nginx.clojure.clj.LazyRequestMap
    • Copyright © 2018 www.massapicom. 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.