Examples of PersistentHashSet

Examples of clojure.lang.PersistentHashSet

190
191
192
193
194
195
196
197
198
199
200
        if (!(arg.respondsTo("intersection"))) throw context.getRuntime().newArgumentError("argument should be a set");
        IPersistentSet other = (IPersistentSet)DiametricUtils.getPersistentSet(context, arg);
        try {
            Var var = DiametricService.getFn("clojure.set", "intersection");
            if (set instanceof HashSet) {
                PersistentHashSet value = convertHashSetToPersistentHashSet(set);
                return DiametricUtils.convertJavaToRuby(context, var.invoke(value, other));
            } else {
                return DiametricUtils.convertJavaToRuby(context, var.invoke(set, other));
            }
        } catch (Throwable t) {
View Full Code Here

Examples of clojure.lang.PersistentHashSet

244
245
246
247
248
249
250
251
252
253
254
        if (!(arg.respondsTo("union"))) throw context.getRuntime().newArgumentError("argument should be a set");
        IPersistentSet other = (IPersistentSet)DiametricUtils.getPersistentSet(context, arg);
        try {
            Var var = DiametricService.getFn("clojure.set", "union");
            if (set instanceof HashSet) {
                PersistentHashSet value = convertHashSetToPersistentHashSet(set);
                return DiametricSet.getDiametricSet(context, (Set)var.invoke(value, other));
            } else {
                return DiametricSet.getDiametricSet(context, (Set)var.invoke(set, other));
            }
        } catch (Throwable t) {
View Full Code Here

Examples of clojure.lang.PersistentHashSet

261
262
263
264
265
266
267
268
269
270
271
        if (!(arg.respondsTo("difference"))) throw context.getRuntime().newArgumentError("argument should be a set");
        IPersistentSet other = (IPersistentSet)DiametricUtils.getPersistentSet(context, arg);
        try {
            Var var = DiametricService.getFn("clojure.set", "difference");
            if (set instanceof HashSet) {
                PersistentHashSet value = convertHashSetToPersistentHashSet(set);
                return DiametricSet.getDiametricSet(context, (Set)var.invoke(value, other));
            } else {
                return DiametricSet.getDiametricSet(context, (Set)var.invoke(set, other));
            }
        } catch (Throwable t) {
View Full Code Here

Examples of clojure.lang.PersistentHashSet

101
102
103
104
105
106
107
108
109
110
111
112
    if (t instanceof Value) {
      Value<?> ev=(Value<?>) t;
      return values.contains(ev.value);
    }
    if (t instanceof ValueSet) {
      @SuppressWarnings("rawtypes")
      PersistentHashSet tvs=((ValueSet) t).values;
      return tvs.containsAll(values);
    }

    return false;
  }
View Full Code Here

Examples of clojure.lang.PersistentHashSet

111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
    return false;
  }
 
  @Override
  public Type intersection(Type t) {
    PersistentHashSet values=this.values;
    ISeq s=values.seq();
    while(s!=null) {
      Object o=s.first();
      if (!t.checkInstance(o)) {
        values=(PersistentHashSet) values.disjoin(o);
      }
      s=s.next();
    }
    return update(values);
  }
View Full Code Here

Examples of com.trifork.clj_ds.PersistentHashSet

108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
    unlink_oneway(other);
    other.unlink_oneway(self_handle());
  }
 
  public void unlink_oneway(EHandle handle) {
    PersistentHashSet old, links;
    try {

      do {
        old = linksref.get();
        links = (PersistentHashSet) old.disjoin(handle);
      } while (!linksref.weakCompareAndSet(old, links));

    } catch (Exception e) {
      throw new RuntimeException(e);
    }   
View Full Code Here

Examples of com.trifork.clj_ds.PersistentHashSet

147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
  public boolean link_oneway(EHandle h) {
    // TODO: check if h is valid.

    if (h.exists()) {

      PersistentHashSet old, links;
      try {

        do {
          old = linksref.get();
          links = (PersistentHashSet) old.cons(h);
        } while (!linksref.weakCompareAndSet(old, links));

      } catch (Exception e) {
        throw new RuntimeException(e);
      }
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.