Examples of ISeq

Examples of clojure.lang.ISeq

51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
  public void start(FlowProcess fp, AggregatorCall<Tuple> call) {
    call.setContext(null);
  }

  public void aggregate(FlowProcess fp, AggregatorCall<Tuple> call) {
    ISeq fnArgs = RT.seq(Util.tupleToList(call.getArguments()));
    if (null != prepareFn) {
      fnArgs = RT.seq(Util.coerceToList(prepareFn.applyTo(fnArgs)));
    }
    Tuple context = call.getContext();

    if (null == context) {
      Tuple newContext = Tuple.size(1);
      newContext.set(0, fnArgs);
      call.setContext(newContext);
    } else {
      ISeq acc = (ISeq) context.getObject(0);
      ISeq ret = RT.seq(Util.coerceToList(combineFn.applyTo(Util.cat(acc, fnArgs))));
      context.set(0, ret);
    }
  }
View Full Code Here

Examples of clojure.lang.ISeq

74
75
76
77
78
79
80
81
82
83
84
    Tuple context = call.getContext();

    if (null == context) {
      throw new RuntimeException("ClojureMonoidAggregator completed with any aggregate calls");
    } else {
      ISeq finalValue = (ISeq) context.getObject(0);
      call.setContext(null);
      if (null != presentFn) {
        call.getOutputCollector().add(
            Util.coerceToTuple(presentFn.applyTo(finalValue)));
      } else {
View Full Code Here

Examples of clojure.lang.ISeq

28
29
30
31
32
33
34
35
36
37
38
    }
    return applyPrepareFn(args);
  }

  public ISeq applyPrepareFn(TupleEntry args) {
    ISeq input = RT.seq(Util.tupleToList(args));
    if (null != prepareFn) {
      return RT.seq(Util.coerceToList(prepareFn.applyTo(input)));
    } else {
      return input;
    }
View Full Code Here

Examples of clojure.lang.ISeq

32
33
34
35
36
37
38
39
40
41
42
43
44
45
  public ClojureMapcat(Fields outputFields, IFn fn) {
    super(outputFields, fn);
  }

  public void operate(FlowProcess fp, FunctionCall call) {
    ISeq fnArgs = Util.coerceFromTuple(call.getArguments().getTuple());
    ISeq resultSeq = RT.seq(applyFunction(fnArgs));
    TupleEntryCollector collector = call.getOutputCollector();
    while (resultSeq != null) {
      Object obj = resultSeq.first();
      collector.add(Util.coerceToTuple(obj));
      resultSeq = resultSeq.next();
    }
  }
View Full Code Here

Examples of clojure.lang.ISeq

32
33
34
35
36
37
38
39
40
41
42
43
44
45
  public ClojureBufferIter(Fields outputFields, IFn fn) {
    super(outputFields, fn);
  }

  public void operate(FlowProcess flow_process, BufferCall call) {
    ISeq resultSeq =
        RT.seq(invokeFunction(new TupleSeqConverter(call.getArgumentsIterator())));
    TupleEntryCollector collector = call.getOutputCollector();
    while (resultSeq != null) {
      Object obj = resultSeq.first();
      collector.add(Util.coerceToTuple(obj));
      resultSeq = resultSeq.next();
    }
  }
View Full Code Here

Examples of clojure.lang.ISeq

133
134
135
136
137
138
139
140
141
142
        return equals(o);
    }

    @Override
    public int hashCode() {
        ISeq s = seq();
        if (s == null)
            return 1;
        return Util.hash(s);
    }
View Full Code Here

Examples of clojure.lang.ISeq

141
142
143
144
145
146
147
148
149
150
        return Util.hash(s);
    }

    @Override
    public int hasheq() {
        ISeq s = seq();
        if (s == null)
            return 1;
        return Util.hasheq(s);
    }
View Full Code Here

Examples of clojure.lang.ISeq

149
150
151
152
153
154
155
156
157
158
159
        return Util.hasheq(s);
    }

    @Override
    public boolean equals(Object o) {
        ISeq s = seq();
        if (s != null)
            return s.equiv(o);
        else
            return (o instanceof Sequential || o instanceof java.util.List) && seq(o) == null;
    }
View Full Code Here

Examples of clojure.lang.ISeq

52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
    return null;
  }

  @Override
  public boolean equiv(Object o) {
    ISeq oseq=RT.seq(o);
    FastSeq head=this;
    while (head!=null) {
      if (oseq==null) return false;
      if (!clojure.lang.Numbers.equiv(head._first, oseq.first())) return false;
      head=head._next;
      oseq=oseq.next();
    }
    return (o==null);
  }
View Full Code Here

Examples of com.trifork.clj_ds.ISeq

537
538
539
540
541
542
543
544
545
546
547
      return new EList(h, this);
    }

    @Override
    public ESeq tail() {
      ISeq c2 = coll.next();
      if (c2 == null) {
        if (map_seq == null || map_seq == map_seq.empty()) return ERT.NIL;
       
        return new ELSeq(map_seq);
      } else {
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.